インスタンスリストからRでデータフレームを作成

Question

ウェブサイトからデータのリストを拾い、以下のコードを使用してRのリストに変換しました。これで要素Iのリストに変換されました。必要に応じてそれをマトリックス/データフレームに入れることはできません。

htmlpage5<-read_html("http://www.catholichealthinitiatives.org/landing.cfm? xyzpdqabc=0&id=39524&action=list&sortby=state&pageNo=4") 
chihtml5<-html_nodes(htmlpage5,".info") 
chi5<-html_text(chihtml5) 


chi27<-strsplit(trimws(chi5), '[\n\r\t]+|(?<![A-Z])\\B(?=[A-Z])|(?<=[a- z]\\.)\\b(?=[A-Z])', perl = TRUE) 
chi27 

myfunction<-function(x) { 
    if (length(x)==4) {x <- c(x,"")} 
    else if (length(x)==3) {x <- c(x,"","")} 
    return(x)} 

chiapply2 <- sapply(chi27, my function) 
chiapply2 

このコードを実行すると、chiapply 2は次のデータになります。その後、Excelに報告して、CVS/TSVに変換することができるように

[[24]] 
[1] "CHI Health Schuyler" "104 W. 17 St."  "Schuyler, NE 68661" "P  402.352.2441"  ""     

[[25]] 
[1] "CHI Health St. Elizabeth" "555 South 70th Street" "Lincoln, NE 68510"   "P 402.219.800"   
[5] "F 402.219.8973"   

等...

はどのようにすればマトリックス/データフレームの中に、このデータを変換することができます。どんな助けでも大歓迎です！

これは私が使用しようとしていますコードです：

chit2 <- t(chiapply2) 
class(chit2) 
chit2 

しかし、私はこの戻っています：あなたの助けを

 [,1]  [,2]  [,3]  [,4]  [,5]  [,6]  [,7]  [,8]  [,9]  [,10]  
[1,] Character,5 Character,6 Character,5 Character,5 Character,5 Character,5 Character,5 Character,5 Character,5 Character,5 

をどうもありがとうを！あなたのようなインスタンスの

Answer 1

私がリストを持っている場合は、x、ん：次のように

> x = list() 
> x[[1]] = c("a", 1, 2) 
> x[[2]] = c("b", 1, 2) 
> x 
[[1]] 
[1] "a" "1" "2" 

[[2]] 
[1] "b" "1" "2" 

私はデータフレームにこれを回すことができます。

> y <- data.frame(t(as.data.frame(x)), row.names = 1:length(x)) 
> y 
    X1 X2 X3 
1 a 1 2 
2 b 1 2 

をそうchiapply2はあなたのリストの場合：

chiapply3 <- data.frame(t(as.data.frame(chiapply2)), row.names = 1:length(chiapply2)) 

これは、2つのc ast34からdata.frameになりますが、それは機能しています...