[R] producing a QQ plot.

[Joshua Wiley]

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


Best regards,


Josh