向循環圖R添加標題

Question

我試圖在R中循環很多圖。我使用的代碼如下所示：

#--------------------------------------------------------------------
#### Read data & Converting factors ####
dat <- read.table("Complete RING.txt", header =TRUE)  
str(dat)
dat$Vial <- as.factor(dat$Vial)
dat$Line <- as.factor(dat$Line)
dat$Fly <- as.factor(dat$Fly)  
dat$Temp <- as.factor(dat$Temp)
str(dat)


meltet <- melt(dat, id=c("Concentration","Sex","Line","Vial", "Fly", "Temp", "Vial_nr"))
meltet1 <- subset(meltet, Line=="20")
meltet1$variable <- as.factor(meltet1$variable)

AllConcentrations <- levels(unique(meltet1$Concentration))
for (i in AllConcentrations) {
meltet.i <- meltet1[meltet1$Concentration ==i,]
quartz()
print(dotplot(value~variable|Temp, group=Sex, data = meltet.i ,xlab="Time", ylab="Fly position", main=paste("Line 20 concentraion", AllConcentrations[i]))) }

im使用的濃度分別表示為A，B，C，D，E，X和Y-我如何為隨圖而變化的圖添加標題，我嘗試使用main =“”函數，但隨后我得到了每個圖中的名稱相同。 我現在得到的標題是：每張圖中的第20行濃度NA

編輯：更新了代碼

Answer 1

我相信您要遍歷的AllConcentrations向量是“字符”類的。 如果要在標題中使用它，請使用main=AllConcentrations[i] 。 您還可以通過以下粘貼功能使這個幻想： main=paste("Graph of", AllConcentrations[i]) 。