## ----eval = FALSE------------------------------------------------------------- # read.csv(text = "a,b\n1,2\n3,4") # #> a b # #> 1 1 2 # #> 2 3 4 ## ----eval = FALSE------------------------------------------------------------- # tibble::tribble( # ~ a, ~ b, # 1, 2, # 3, 4 # ) # #> # A tibble: 2 x 2 # #> a b # #> # #> 1 1 2 # #> 2 3 4 ## ----eval = FALSE------------------------------------------------------------- # tibble::tribble( # ~weight, ~Time, ~Chick, ~Diet, # 42, 0, "1", "1", # 51, 2, "1", "1", # 59, 4, "1", "1" # ) ## ----eval = FALSE------------------------------------------------------------- # opar <- par(pch = 19) # # par(opar) ## ----eval = FALSE------------------------------------------------------------- # write(x, "foo.txt") # # file.remove("foo.txt")