#1.条形图
#1.1水平or竖直条形图 :向量绘图
library(vcd)
library(grid)
counts<- table(Arthritis$Improved)
str(counts)
> counts
None Some Marked
42 14 28
barplot(counts)#简单条形图
#1.2堆砌条形图or分组条形图 : 矩阵绘图
cells<-c(1,2,3,4)
rnames<-c("R1","R2")
cnames<-c("C1","C2")
m&
#1.1水平or竖直条形图 :向量绘图
library(vcd)
library(grid)
counts<- table(Arthritis$Improved)
str(counts)
> counts
None Some Marked
42 14 28
barplot(counts)#简单条形图
barplot(counts,horiz = T)#水平条形图 horiz = T
a<-c(1,2,3,5)
barplot(a)#向量绘图
plot(Arthritis$Improved) #绘图效果同 barplot(counts)
#1.2堆砌条形图or分组条形图 : 矩阵绘图
cells<-c(1,2,3,4)
rnames<-c("R1","R2")
cnames<-c("C1","C2")
m&