在条形图中拆分Y轴 - R.

Question

如何在R中绘图时将条形图中的y轴分割。

示例数据：

   Name     Freq
  PRIM2      310
 NBPF20       45
  NBPF1       12
   CD24       11
 SEC22B        7
 ZNF718        7

我用来绘制此代码的代码：

d <- read.table("Sample.txt", header=TRUE)
barplot(d$Freq, names.arg=d$Name, col='red', cex.axis=0.8, cex.names=0.7, las=3)

谢谢

Answer 1

df <- data.frame(
  Name=c("PRIM2", "NBPF20", "NBPF1", "CD24", "SEC22B", "ZNF718"),
  Freq=c(310, 45, 12, 11, 7, 7)
  )

library("plotrix")
gap.barplot(df$Freq, c(50,300), df$Name)

http://www.inside-r.org/packages/cran/plotrix/docs/gap.barplot