作者CAPPON (JI3)
看板R_Language
标题Re: [问题] ggplot2回圈
时间Mon Dec 5 11:03:30 2016
举个例子
aaa=matrix(c("A","A","A","B","B","B","C","C","A1","A2","A3","A1","A2","A3","A1
","A2",0.92,0.95,0.94,0.91,0.99,0.98,0.88,0.91,0.92,0.94,0.95,0.96,0.98,0.92,0
.94,0.92),8,4)
dimnames(aaa)[[2]]=c("Index","Item","M08","12/2")
1.by index画图，相同的index画在同一张，item为每一条线。所以会有3张图...想要一页
呈现2张图
2.因栏位名称有文字跟日期...该怎麽处理呢？日期部份读入会变成x12.2
遇到这2个问题，再麻烦前辈帮忙了
谢谢
※ 引述《CAPPON (JI3)》之铭言：
: 程式谘询(我想用R 做某件事情，但是我不知道要怎麽用R 写出来)
: [环境叙述]:
: R version 3.3.2
: 请教前辈
: 想用ggplot产生多张图 , 一页放6张图
: 用回圈去写时,无法产生图形
: 不晓得是哪里出错了
: 但如果用i=1 , i=2 一个一个跑却是没问题
: 另外 产生的pdf档图形的大小是否可以更改呢?
: 谢谢
: pdf(file=paste("D:\\123123", ".pdf", sep=""))
: for ( i in 1:2){
: ggplot(data_melt_TN[data_melt_TN[,3]==TN[(i-1)*6+1]|data_melt_TN[,3]==TN[(i-
1)
: aes(x = variable, y = value, group = id,
: colour = Item)) + geom_point(cex=2) + geom_line()
+
: scale_color_manual(values=c("red","orange","green"))+
: facet_wrap(~Index,ncol=2)+
: theme(axis.text.x = element_text(angle = 90, hjust = 1,size=12))
: }
: dev.off()
--
※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 223.139.2.29
※ 文章网址: https://webptt.com/cn.aspx?n=bbs/R_Language/M.1480907013.A.BFC.html
1F：→ CAPPON: 补充一下，每次产生的index个数都会不一样。固定产生的图 12/05 11:13
2F：→ CAPPON: 要一页2张index的参数 12/05 11:13