中每個函數的使用相同的變量：如何使它比重新編寫或複製每次

Question

所以我有這樣的更加高效：

colnames(df)<-c("long_name_1","long_name_2",...,"long_name_n") 

，我想用這個這些名字：

hist(df$long_name_1, main = paste("Histogram of'" , "long_name_1"),xlab="long_name_1") 
hist(df$long_name_2, main = paste("Histogram of'" , "long_name_2"),xlab="long_name_2") 
. 
. 
. 
hist(df$long_name_n, main = paste("Histogram of'" , "long_name_n"),xlab="long_name_n") 

有沒有一種更簡單的方法來做到這一點，而不是複製每個名稱，並將它們粘貼三次以獲得特定功能？

Answer 1

最簡單的方法是將包裹hist在for循環：

long_names <- c("long_name_1","long_name_2",...,"long_name_n") 

for(i in seq_along(long_names) { 
    hist(df[, long_names[i]], main = paste("Histogram of'" , long_names[i]),xlab=long_names[i]) 
} 

當然，你可能會想包裝在pdfhist作爲以及輸出爲PDF格式，但這樣可以節省您的複製。