Note that there are some explanatory texts on larger screens.

plurals
  1. POHow to display the frequency at the top of each factor in a barplot in R
    primarykey
    data
    text
    <blockquote> <p><strong>Possible Duplicate:</strong><br> <a href="https://stackoverflow.com/questions/4217207/add-text-to-horizontal-barplot-in-r-y-axis-at-different-scale">add text to horizontal barplot in R, y-axis at different scale?</a><br> <a href="https://stackoverflow.com/questions/9815226/annotate-values-above-bars-ggplot-faceted">Annotate values above bars (ggplot faceted)</a> </p> </blockquote> <p>Using the code below, I'm hoping to display a number above each column that corresponds to the y-value for that column. In other words, I'm trying to get "QnWeight_initial" to display 593 at the top of the gray bar and so and...</p> <p>My data:</p> <pre><code>data&lt;-structure(list(V1 = structure(c(2L, 1L), .Label = c("593", "QnWeight_initial" ), class = "factor"), V2 = structure(c(2L, 1L), .Label = c("566", "Head"), class = "factor"), V3 = structure(c(2L, 1L), .Label = c("535", "V1"), class = "factor"), V4 = structure(c(2L, 1L), .Label = c("535", "V2"), class = "factor"), V5 = structure(c(2L, 1L), .Label = c("535", "V3"), class = "factor"), V6 = structure(c(2L, 1L), .Label = c("482", "Left_Leg"), class = "factor"), V7 = structure(c(2L, 1L), .Label = c("474", "Left_Antenna"), class = "factor"), V8 = structure(c(2L, 1L), .Label = c("237", "Qn_Weight_Loss"), class = "factor"), V9 = structure(c(2L, 1L ), .Label = c("230", "Days_wrkr_eclosion"), class = "factor"), V10 = structure(c(2L, 1L), .Label = c("81", "Growth_all"), class = "factor"), V11 = structure(c(2L, 1L), .Label = c("79", "Growth_1_2"), class = "factor"), V12 = structure(c(2L, 1L), .Label = c("62", "Growth_1_3"), class = "factor"), V13 = structure(c(2L, 1L), .Label = c("60", "Growth_2_3"), class = "factor"), V14 = structure(c(2L, 1L), .Label = c("51", "Right_Antenna" ), class = "factor"), V15 = structure(c(2L, 1L), .Label = c("49", "Left_Leg_Remeasure"), class = "factor"), V16 = structure(c(2L, 1L), .Label = c("49", "Right_Leg"), class = "factor"), V17 = structure(c(2L, 1L), .Label = c("47", "Head_Remeasure"), class = "factor"), V18 = structure(c(2L, 1L), .Label = c("46", "Left_Antenna_Remeasure" ), class = "factor")), .Names = c("V1", "V2", "V3", "V4", "V5", "V6", "V7", "V8", "V9", "V10", "V11", "V12", "V13", "V14", "V15", "V16", "V17", "V18"), class = "data.frame", row.names = c(NA, -2L)) dat&lt;-data.frame(fac=unlist(data[1,, drop=FALSE]), freqs=unlist(data[2,, drop=FALSE])) </code></pre> <p>The plot:</p> <pre><code>barplot( as.numeric( as.character(dat$freqs)) , main="Sample Sizes of Various Fitness Traits", xaxt='n', xlab='', width=0.85, ylab="Frequency") par(mar=c(5,8,4,2)) labels&lt;-unlist(data[1,,drop=FALSE]) text(1:18, par("usr")[3] -0.25, srt=90, adj=1,labels=labels,xpd=TRUE, cex=0.6) </code></pre>
    singulars
    1. This table or related slice is empty.
    plurals
    1. This table or related slice is empty.
    1. This table or related slice is empty.
 

Querying!

 
Guidance

SQuiL has stopped working due to an internal error.

If you are curious you may find further information in the browser console, which is accessible through the devtools (F12).

Reload