Jak przekazać dodatkowy argument do argumentu funkcji do.call w R

Question

Chciałbym przekazać argument (stringsAsFactors=FALSE) do rbind w do.call. Ale dodaje nie działa:

data <- do.call(rbind, 
      strsplit(readLines("/home/jianfezhang/adoption.txt"), split="\t#\t"), 
      args=list(stringsAsFactors=FALSE)) 

Answer 1

do.call(rbind.data.frame, c(list(iris), list(iris), stringsAsFactors=FALSE)) 

byłaby moja odpowiedź, gdyby nie fakt, że rbind nie wie, co zrobić z stringsAsFactors (ale cbind.data.frame będzie).

Wyjście z strsplit jest prawdopodobnie listą wektorów, w którym to przypadku rbind tworzy macierz. Można określić stringsAsFactors podczas konwersji tej macierzy do data.frame,

data.frame(do.call(rbind, list(1:10, letters[1:10])), stringsAsFactors=FALSE) 

Answer 2

Nie jestem pewien, czy wywołanie funkcji jest ważny, ale spróbuj tego:

data <- do.call(rbind, 
    c(strsplit(readLines("/home/jianfezhang/adoption.txt"),split="\t#\t"), 
    list(stringsAsFactors=FALSE)) 

Musisz przejść wszystkie argumenty do.call pośrednictwem jednej listy. Można Concat dwa listy przez c

> c(list(1, 2), list(3, 4)) 
[[1]] 
[1] 1 

[[2]] 
[1] 2 

[[3]] 
[1] 3 

[[4]] 
[1] 4 

Answer 3

Alternatywnie, można ustawić stringsAsFactors do FALSE globalnie za pomocą options:

options(stringsAsFactors=FALSE) 

Ustawienie tego na górze skryptu wymusi to przez cały scenariusz. Możesz nawet dodać do .Rprofile, aby ustawić tę opcję dla wszystkich otwartych sesji R.