জিপিপ্লট 2 সহ আর এর প্রতিটি বারের জন্য জিওম_বারের উপরে কীভাবে লেবেল লাগানো যায়

Question

আমি এটি খুঁজে পেয়েছি, জিপিপ্লট 2 দিয়ে আর-তে জিওম_বারের উপরে কীভাবে লেবেল লাগানো যায় তবে এটি কেবল একটি বারের উপরে লেবেল (সংখ্যা) রাখে।

এখানে বলা যাক, প্রতিটি এক্স-অক্ষের জন্য দুটি বার, একই জিনিসটি কীভাবে করবেন?

আমার ডেটা এবং কোড এর মতো দেখাচ্ছে:

dat <- read.table(text = "sample Types Number
sample1 A   3641
sample2 A   3119
sample1 B   15815
sample2 B   12334
sample1 C   2706
sample2 C   3147", header=TRUE)

library(ggplot2)
bar <- ggplot(data=dat, aes(x=Types, y=Number, fill=sample)) + 
  geom_bar(position = 'dodge') + geom_text(aes(label=Number))

তারপরে, আমরা পাবেন:

দেখে মনে হচ্ছে সংখ্যার পাঠ্যও "ডজ" প্যাটার্নে অবস্থিত। আমি কিছু তথ্য খুঁজে পেতে geom_text ম্যানুয়াল অনুসন্ধান করেছি , কিন্তু এটি কার্যকর করতে পারে না।

পরামর্শ?

Answer 1

এটা চেষ্টা কর:

ggplot(data=dat, aes(x=Types, y=Number, fill=sample)) + 
     geom_bar(position = 'dodge', stat='identity') +
     geom_text(aes(label=Number), position=position_dodge(width=0.9), vjust=-0.25)

Comments

(+1) আপনি বিবৃতি vjust = -0.5দেওয়ার পরেও যুক্ত করতে পারেন position()যাতে মানগুলি বারের ঠিক উপরে থাকে।

— স্মিলিগ

দুর্দান্ত ধন্যবাদ, উপায় দ্বারা, কোডটি সেটিংয়ের পরামর্শ দেয় ymax, তাই aes(x=Types, y=Number, fill=sample, ymax = 16000), y- অক্ষের জন্য আরও বিস্তৃত উপরের অঞ্চল তৈরি করবে, যাতে 15815 আরও ভাল প্রদর্শিত হবে।

— পুরিনি

আমি এই ত্রুটিটি পেয়েছি: ত্রুটি: স্টেট_কাউন্ট () অবশ্যই অ্যায় নান্দনিকতার সাথে ব্যবহার করা উচিত নয়।

— ব্যবহারকারী জেটি

এই উত্তরটি নতুন বাক্য গঠন হয়েছে stackoverflow.com/questions/33079500/...

— userJT

@Seymourgeom_text(..., angle=-90)

— rcs

Answer 2

আরসিএসের উত্তরে যুক্ত করতে, আপনি যদি এক্স পসএক্স.সিটি তারিখের সময় জিওম_বার () সহ অবস্থান_ডজ () ব্যবহার করতে চান, আপনাকে অবশ্যই প্রস্থটি 86400 দিয়ে গুণতে হবে, যেমন,

ggplot(data=dat, aes(x=Types, y=Number, fill=sample)) + 
 geom_bar(position = "dodge", stat = 'identity') +
 geom_text(aes(label=Number), position=position_dodge(width=0.9*86400), vjust=-0.25)