2016-05-17 4 views
0

So kopieren ich dieses:Mit gleichen Variablen in jeder Funktion: wie es effizienter als Umschreiben machen oder jedes Mal

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

und ich möchte diese Namen in diese verwenden:

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") 

Gibt es einen einfacheren Weg, als jeden Namen zu kopieren und sie jeweils dreimal für ihre spezifische Funktion einzufügen?

Antwort

1

Die einfachste Methode wäre, die hist in einer for Schleife wickeln:

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]) 
} 

Natürlich Sie hist in einem pdf als auch die Ausgabe als PDF-Datei wickeln möchten, aber das spart Kopieren.

Verwandte Themen