On Sat, Mar 19, 2011 at 2:53 AM, Guy Jett <gj...@itsi.com> wrote:
> Due to an error on my part, I have renamed the previously attached file from
> T_5-04b_LTC-SE-SO-Compared.csv to
> T_5-04b_LTC-SE-SO-Compared.txt.
> It remains a comma-delimited file so the extension can be changed and used
> per the script, or loaded separately.
> My sincere apologies,
> Guy
>
> -----Original Message-----
> From: Guy Jett
> Sent: Friday, March 18, 2011 1:13 PM
> To: 'r-help@R-project.org'
> Subject: XYPlot Conditioning Variable in Specific, Non-Alphanumeric Order.
>
> # I need to create an xyplot() where I control the specific order of # both
> my conditioning variables. The default code below plots the # data
> correctly (dispersed across all 14 columns), but fails in two # ways. Both
> the primary conditioning variable (Transect), and the # secondary
> conditioning variable (Offset) are in alphanumeric order, # rather than the
> specific order I need.
>
> # Here is a call to the input datafile, which should be attached. You may
> rename that .txt file to .csv for processing in the following line.
> df <- read.csv(file = "T_5-04b_LTC-SE-SO-Compared.csv")
>
> # Basic default plot (correct data, incorrect layout):
> xyplot((sbd+sed)/2 ~ Result | Offset+Transect, groups = PARLABEL, as.table
> = TRUE,
> data = df,
> layout = c(14,4), type = "b")
>
> # I attempted to control the order following the method described in # the
> thread "[R] xyplot() - can you control how the plots are # ordered?", but I
> appear to be missing, or misunderstanding # something. The modeled code is
> here. It does put all the # individual 'lattices'(?) in the needed order,
> BUT the graphics # for the individual sets dump all the measurements into a
> single # cell, on the diagonal, as if it's treating the conditioning #
> variables as an [i,j] index. Again not what I want.
>
> # Draft code (incorrect data, correct layout):
> Transects <- c("LNF02", "LSF02", "LUR01", "LURT1", "LUR03",
> "LUR05", "LUR09", "LUR11", "LUR12", "LUR15",
> "LUR16", "LUR21", "LURT3", "LUR25", "LURT4",
> "LUR28", "LUR36", "LUR38", "LUR46", "LURT5",
> "LUR48", "LLR04", "LLR10", "LLR11", "LLRT1",
> "LLR17", "LLRT2", "LLR18", "LLRT3", "LLR19")
> Transects <- factor(Transects, levels = Transects)
>
> Offsets <- c("T", "U", "V", "Y", "Z", "A", "B", "C", "D", "E", "F", "G",
> "H")
> Offsets <- factor(Offsets, levels = Offsets)
>
> xyplot((sbd+sed)/2 ~ Result | Offsets+Transects, groups = PARLABEL,
> as.table = TRUE,
> data = df,
> layout = c(13,5), type = "b")
>
> # What I am looking for is a combination of the default plot, but ordered in
> # the layout of the second code fragment.
You need to specify the order of the levels explicitly (to override
the default). Here is how to do it for one, you can similarly do the
other:
> levels(df$Offset)
[1] "T" "U" "V" "Y" "Z" "A" "B" "C" "D" "E" "F" "G" "H"
> df$Offset <- factor(df$Offset,
+ levels = c("T", "U", "V", "Y", "Z", "A",
+ "B", "C", "D", "E", "F", "G", "H"))
> levels(df$Offset)
[1] "T" "U" "V" "Y" "Z" "A" "B" "C" "D" "E" "F" "G" "H"
Once you make these changes, your original call should work as desired.
-Deepayan
______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.
