fork download 
  1. # your code goes here
  2.  
  3. # 爬下來的html
  4. test <- read_html('<table border="1">
  5.         <caption>title</caption>
  6.         <tbody><tr>
  7.             <th>id</th>
  8.             <td colspan="3">aaa</td>
  9.         </tr>
  10.         <tr>
  11.             <th style="width:15%">d</th>
  12.             <td style="width:35%">ddd</td>
  13.             <th style="width:15%">e</th>
  14.             <td style="width:35%">eee</td>
  15.         </tr>
  16.     </tbody></table>')
  17.  
  18. test
  19. # {xml_document}
  20. # <html>
  21. # [1] <body><table border="1">\n<caption>title ...
  22.  
  23. # 執行html_text()的結果
  24. test %>% html_text()
  25. # [1] "title\n        id\n            aaa\n        d\n            ddd\n
  26. #   e\n            eee\n        "
  27.  
Success #stdin #stdout #stderr 0.19s 183680KB
comments (?)
stdin 
Standard input is empty
stdout 
Standard output is empty
stderr 
Error: could not find function "read_html"
Execution halted
https://ideone.com/bbRbpg
language:
R (R 3.5.2)
created:
4 years ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!