2017-05-03 47 views
-1

我只是想知道是否有什么办法,我可以用向量元素来改变/更新文字R.此刻,我想用ggsave节省了大量的地块与GGPLOT2改变文本函数,使得我有:使用矢量元素中的R

ggsave(filename= "xxxPlot.jpg", plot= xxx, scale = 1, width = 16, height= 8) 

现在,由于我有大量我想改变“xxxPlot.jpg”部分,使得“xxx”的部分被替换为一个矢量的字符地块。

例如,假设我有一个字符串矢量如下:

vector <- c(AAA, BBB, CCC, DDD, EEE, FFF, GGG, HHH) 

我想找到一种方法,能够改变/更新行

ggsave(filename= "xxxPlot.jpg", plot= xxx, scale = 1, width = 16, height= 8) 

ggsave(filename= "aaaPlot.jpg", plot= xxx, scale = 1, width = 16, height= 8) 
ggsave(filename= "bbbPlot.jpg", plot= xxx, scale = 1, width = 16, height= 8) 
ggsave(filename= "cccPlot.jpg", plot= xxx, scale = 1, width = 16, height= 8) 

等自动,而无需手动写出每一行,并同时使用我上面提到的矢量(使用矢量很重要,因为矢量和图是直接从数据帧中获得的)。在R中有没有办法做到这一点?提前致谢。

+1

首先,我会想办法让'VECTOR'像'矢量<实际特征向量 - C( “AAA”, “BBB”, “CCC”,“DDD “,”EEE“,”FFF“,”GGG“,”HHH“),那么你可以循环粘贴一个像paste0(vector,”Plot.jpg“)'' – thelatemail

+0

的字符串[Saving从LS到一个和独立的文件中的R多个ggplots](http://stackoverflow.com/questions/20500706/saving-multiple-ggplots-from-ls-into-one-and-separate-files-in-r) –

+0

假设你不想救同积8倍,你可能需要'的Map'代替'lapply'。 – alistaire

回答

1

你可以试试这个 -

vector <- c("AAA", "BBB", "CCC", "DDD", "EEE", "FFF", "GGG", "HHH") 
    Plots<-paste(vector,"plot.jpg") 
for (i in length(Plots)){ 
ggsave(filename= Plots[i], plot= vector[i], scale = 1, width = 16, height= 8) 

} 
+0

谢谢!这正是我一直在寻找的:) – ThePlowKing