It is a bit of a side note really, but a convenient way to provide
data (particularly when it is complex) is via dput(). Not only is
this easier to read in, it preserves classes and other handy info.
For instance, once I had played around to get "Cook" and "Islands"
into one column (since there was a space) I could use:
dput(data, file="clipboard") #data is what is being written and it is
output to the clipboard, works decently in Windows at least
to get:
######################################################
structure(list(country = structure(c(1L, 1L, 1L, 1L, 2L, 2L,
2L, 2L, 2L), .Label = c("Cook Islands", "French Polynesia"), class =
"factor"),
village = structure(c(1L, 4L, 6L, 8L, 2L, 3L, 5L, 7L, 9L), .Label
= c("Aitutaki",
"Fakarava", "Maatea", "Mangaia", "Mataiea", "Palmerston",
"Raivavae", "Rarotonga", "Tikehau"), class = "factor"), group =
structure(c(4L,
3L, 2L, 1L, 2L, 4L, 4L, 2L, 4L), .Label = c("A", "B", "C",
"D"), class = "factor"), av_expen = c(5239.127472, 4587.361877,
7784.318736, 8793.256543, 7937.3952, 12135.84, 12718.57548,
8741.5104, 6295.66), P2ary_ed = c(0.666666667, 0.602150538,
0.166666667, 0.764285714, 0.36, 0.316455696, 0.341880342,
0.285714286, 0.240384615), no_fisher = c(666.9998558, 207.69228,
24.00000002, 223.8639163, 255.3600002, 293.7499998, 2082.386008,
325.0665956, 114.0832839), B_Leth = c(3.286283997, 0.330248,
1.384456001, 6.790178998, 7.485009002, 1.270781, 2.117207998,
20.121207, 5.183129001), B_Lutjan = c(1.971519001, 1.846795,
0.233746, 0.751358, 6.282185007, 0.526468, 0.340852, 4.458011998,
7.178272997), Wt_Leth = c(520.6454552, 0, 0, 51.51418019,
62.28921398, 1002.39553, 1830.16527, 63.49777279, 900.4192224
), Wt_Lutjan = c(126.2441843, 0, 57.76351477, 30.5970125,
60.39332797, 648.4578044, 4239.861263, 0, 935.3617853)), .Names =
c("country",
"village", "group", "av_expen", "P2ary_ed", "no_fisher", "B_Leth",
"B_Lutjan", "Wt_Leth", "Wt_Lutjan"), class = "data.frame", row.names
= c(NA,
-9L))
###########################################
This is easily retrievable by copying the entire block of text and
using:
dget("clipboard") # read the data into R