Utwórz barplot z data.frame

Question

W R Mam data.frame podobne do tego na górze obrazu.

Czy jest możliwość utworzenia siatki podobnej do tej na dole obrazu?

Answer 1

wykorzystaniem grafiki bazowe można to zrobić po prostu:

mydf <- data.frame(X1=c(A=2, B=4, C=1), X2=c(3,2,NA), X3=c(4,1,NA)) 
barplot(t(as.matrix(mydf)), beside=TRUE) 

pomocą dodatkowych połączeń do axis może dać etykietowania bardziej jak w pytaniu.

Answer 2

Zakładając, że nie chcesz wyjście ASCII, tutaj jest rozwiązanie wykorzystujące ggplot2:

# load/generate your data 
mydf <- data.frame(X1 = c(2,4,1), X2 = c(3,2,NA), x3 = c(4,1,NA), row.names=c("A","B","C")) 
mydf$Category <- row.names(mydf) 

# bring your data to long format as needed by ggplot 
library(reshape2) 
mydf.molten <- melt(mydf, value.name="Count", variable.name="Variable", na.rm=TRUE) 

# plot and facet by categories 
library(ggplot2) 
qplot(data=mydf.molten, x = Variable, y = Count, geom="bar", stat = "identity") + facet_wrap("Category") 

celu uzyskania dalszych informacji, polecam zasięgnąć opinii ggplot2 manual, zwłaszcza rozdział o numerach geom_bar i facet_wrap.