similar to: Lattice group colors?

Dear list, I have been working on a report with around 60 images in it, and everything has been fine, until now. I find that the image output that is produced by odfWeave produces images that are NOT readable by OpenOffice or NeoOffice. I get empty boxes with Read-Error written in them. While generating the file using odfWeave, I can see them being generated on the screen, and they all seem fine.

Dear list, Sorry for asking this very silly question on the list, but I seem to have made my life complicated by going into string manipulation in vectors. What I need is to get the last part of a sting (the two last tokens, separated by a space), and of course, this should be done for all strings in a vector, creating a new vector of exual size. So, a <- c(" %L H*L L*H H%",

Dear list, I am sorry for asking you this, but I am trying to do again what I thought I have done before, although this time it does not work. So, given the data set: > testdf <- data.frame(grfak=sample(c("One","Two"),size=100,replace=TRUE), panfak= sample(c("Yes","No"),size=100,replace=TRUE), xfak=

Dear list, I would like to create histograms for up to three groups, with distincive colour/pattern, in a trellis panel. However, I have not been able to find a way to do this. histogram does not seem to have a group argument. Please help. /Fredrik

Dear list, Sorry for asking this question, but has something changed in the syntax for bwplot in Lattice? In an old publication, I used > bwplot( VOTMS ~gender |type * group, data=merge(vot,words,by="ord"), nint=30, horizontal=F, layout=c(3,3), box.ratio=0.8) which produced a lovelly 3x3 lattice plot with one

Dear list, The output of my embedded code sections come out in the style "ttBlue" wich is Times New Roman and Blue when I open document. I would like to change this to a fixed witdth font, smaller and less blue by using style definitions in the document, but it really does not affect the output. I tried including getStyleDefs() -> styl styl$ttBlue$fontname <- "Courier"

Dear list, I've been using plotmeans {gplots} a lot before, and found the "connect" argument to be quite useful. I've moved to ggplot for several reasons, but would still like to connect lines conditionally, somehow. Is it possible to do? Small example: df <- data.frame(cat=LETTERS[1:4],num=rnorm(4)) ggplot(df, aes(x=cat, y=num)) + geom_point() +

Dear list, I am leaving my old position and now need to convert my R data frames into a format that can be used by an SPSS user replacing me, without running into conversion problems. The data set consists of strings in UTF8 encoding and values in double precision floats. The data set is not terribly large, but I had bit problems getting it into R due to the large number of unfortunate characters

Dear list, This seems like a very simple problem, but I am failing to loose a dimension (I think). I have list, like this: ... [2072] "!H*L" "L%" "%L" "H*L" "L%" "%L" "H*L" "H*L" "L%" "%L" "H*L" "!H*L" "L%" "%L" "%L"

Hi there, after several problems with installing R on a Debian server It now finally works at least roughly. With roughly I mean that the 'core' function do work properly, but I'm still having problems with the image export. When I try to call png(filename="my_file.png", width=800, height=300, pointsize=12, bg = "white") I just get the error message

Dear list, I used to have this code in a Sweave document: sel <- placeDF$Place == "Velar" & placeDF$manner == "Plosive" table(placeDF$agem[sel], placeDF$place[sel]) -> pd print( dotplot( prop.table(pd,margin=1), auto.key=list( space="right" ), xlab="Relative Frequency",

Dear list, I am trying to plot a barchart (from lattice) in B & W, with 10 categories per bar. It seems that the colours are recycled after reachingcategory number 7, which creates a problem interpreting the chart. I therefore have two questions: 1) How do I get more shades? 2) Does anyone have a theme to share with me with distinctive shades in Black & White? Thankful for all the

An embedded and charset-unspecified text was scrubbed... Name: inte tillg?nglig URL: <https://stat.ethz.ch/pipermail/r-help/attachments/20120303/a62e41f2/attachment.pl>

An embedded and charset-unspecified text was scrubbed... Name: inte tillg?nglig URL: <https://stat.ethz.ch/pipermail/r-help/attachments/20110811/f20d8760/attachment.pl>

Dear list, Sorry to ask you this, but I just ran a TukeyHSD on an model with a two thee level factors as independent variables and a numeric score dependent variable. The aov gives a significant interaction effect, and using the TukeyHSD, I get almost every row to be exactly 0.0000000. Should I be worried?? /Fredrik -- "Life is like a trumpet - if you don't put anything into it, you

Hi, I need a custom axis function for a plot, but it seems that current.panel.limits() sometimes returns NaN limits for the plot, which it much harder to calculate anything sensible. An illustration: Given this axis function: vs.axis <- function(...){ xlim <- current.panel.limits()$xlim ylim <- current.panel.limits()$ylim # Debug code print(list(ylim=ylim,xlim=xlim))

Dear list, Sorry for bothering you with a pure odfSweave question, but I just ran into a problem that I cannot find the cause of. Anyonse seen this before? This file "used to work", but not anymore. Would apreciate all the help I could get. /Fredrik --------------------------------------------------------------- >

Dear list, I'm working on a panel function where I would like to be able to visualise data grouped by the category of the data, and then also changes in summary descriptives from one condition to another in the same scatter plot. Like the figure attached, but with one polygon for each subset of the data set given by a second variable (with colours still coming from the variable specified in

Dear list, I am trying to construct a report function that would go through all the object in the current environment and print them in HTML form. What I have got is: dataReport <- function(){ #First tables tabs <- ls(sys.frame(), pattern=".*table") for(currT in tabs){ cat("\n\n") print(currT) if(length(dim(get(currT))) > 2){ #We have to use ftable

Dear list, I need to convert this data.frame > names(codesM) [1] "key" "AMR.pa1.M" "AMR.pa2.M" "AMR.pa3.M" "AMR.pa4.M" [6] "AMR.pa5.M" "AMR.pa6.M" "AMR.pa7.M" "AMR.pa8.M" "AMR.pa9.M" [11] "AMR.pa10.M" "AMR.ta1.M" "AMR.ta2.M" "AMR.ta3.M"