Differences

This shows you the differences between two versions of the page.

--- r:input_output [2018/11/16 08:18] – [Fixed-Width Records] hkimscil
+++ r:input_output [2019/09/20 10:29] – [Reading from CSV Files] hkimscil
@@ Line 69: / Line 69: @@
 Yates     Frank     1902 1994
 Smith     Kirstine  1878 1939
 </code>
-<code>> records <- read.fwf("fixed-width.txt", widths=c(10,10,4,-1,4))
+<code>> records <- read.fwf("http://commres.net/wiki/_export/code/r/input_output?codeblock=11", widths=c(10,10,4,-1,4))
 </code>
@@ Line 84: / Line 85: @@
 Smith      Kirstine   1878 1939
 </code>
+Funky variable names (V1, V2, . . .). Use the below method with "col.names=c()" option.
-<code>> records <- read.fwf("fixed-width.txt", widths=c(10,10,4,-1,4),
+<code>> records <- read.fwf("http://commres.net/wiki/_export/code/r/input_output?codeblock=11", widths=c(10,10,4,-1,4),
 +                     col.names=c("Last","First","Born","Died"))
 > records
@@ Line 163: / Line 165: @@
 </code>
-<code>> tbl <- read.csv("filename")</code>
+<code>> tbl <- read.csv("filename")
+> tbl <- read.csv("http://commres.net/wiki/_export/code/r/input_output?codeblock=24")
+> tbl</code>
-<code>> tbl <- read.csv("filename", header=FALSE)</code>
+<code>> tbl <- read.csv("http://commres.net/wiki/_export/code/r/input_output?codeblock=24", header=FALSE)
+> tbl</code>
+<code>> tbl <- read.csv("http://commres.net/wiki/_export/code/r/input_output?codeblock=24", header=FALSE, sep="\t")
+> tbl</code>
 <code>> str(tbl)
@@ Line 223: / Line 231: @@
 > url <- 'http://en.wikipedia.org/wiki/World_population'
 > tbls <- readHTMLTable(url)
+</code>
+The above not working for me. :(
+<code>library(httr)
+url <- 'http://en.wikipedia.org/wiki/World_population'
+tables <- GET(url)
+tables <- readHTMLTable(rawToChar(tables$content))
 </code>