similar to: drawing segments through points with pch=1

#See David Williams' book "Weighing the odds", p286 y <- c(1.21, 0.51, 0.14, 1.62, -0.8, 0.72, -1.71, 0.84, 0.02, -0.12) ybar <- mean(y) ylength <- length(y) ybarv <- rep(ybar, ylength) x <- 1:ylength plot(x,y,asp=1,xlab="position",ylab="ybar",type="n",ylim=c(-1,1)) segments(x[1], ybar, x[ylength], ybar) segments(x,ybarv,x,y)

Dear R users, I need to save a graph in jpeg format. After plotting the graph, when the graphics window is active, in the File menu, the Save as / Jpeg / 100% quality correctly saves the graph in jpeg format. But I would like to know, how could I control the resolution (in dpi) of the saved jpeg file? I need to produce a jpeg at 1200 dpi. I have tried also the jpeg function in the package

Hello there I have a list, Y, and each component of that list is a real-valued function (that is, Y[[i]](u) returns a number). I was wishing to build the mean function and the first thing I thought of was Ybar<-function(u){ mean(Y[[1:n]](u)) } but obviously this doesn't work, since Y[[1:n]] is not allowed at all. Any elegant suggestions? I really would like to avoid something like

Dear forum, Does anyone know any functions for plotting vertical error bars, if the x-axis variable is a date? I can produce a pretty plot with dates on the x-axis, if I don't want to include error bars. I can also produce a nice plot with error bars, if I just use Julian days for the x-axis, but I'd much rather have the actual dates. I have tried writing my own function, plotCI

I am working with Sweave and would like to print out into my latex document the result of the R command version$platform So what I first tried in my .Rnw document was \Sexpr{print(version$platform)}. However, the output from this command is the string "x86_64-apple-darwin10.8.0" (without the quotes). This contains an underscore, which is a special character in tex and so I get an error

Hi im trying to add error bars to my barplots, there very basic, i have a few grapghs where the y variable is different but on all the X variable is Age (Adult and Juvenile) however this is split into two levels so i have males and females, so my graph basically has four bars on it. I know how to add eror bars for instance when there is only one level eg lookng at the diffrence between male and

To the R help list, When using a data frame, there is no warning or error message when I refer to a non-existent variable inside the data frame. Example: ##---------------------------------------------- a <- c(1,2,3) b <- c(11,22,33) df <- data.frame(a,b) df ## correct: there is a column in df named 'a' ## the sum is correctly performed sum(df$a==2) ## incorrect: there is

Dear R list members, How to produce barplots anchored to the x-axis (not floating above the x-axis) with a box around? With both following codes, the lower horizontal line of the box is below the y = 0 line: # first code x <- c(1,2,3,4) barplot(x,yaxs='i') box() # second code x <- c(1,2,3,4) op <- par(yaxs='i') barplot(x) box() par(op) The parameter yaxs='i'

To the R-help list, In the documentation of the prop.trend.test function in the stats package, no bibliography has been provided which would allow one to find out the theoretical basis of that function and/or details of its implementation. May I suggest that some bibliography be included, as it generally happens with other statistical functions. I currently use R 2.8.0 running on Windows XP.

Dear R-list members, I am trying to put a legend just outside the plotting area of a graph. 1. Is there some way to plot symbols on the figure margin, in the same way as function "mtext" can write on the margin? 2. Is there some way to use the "legend" function (or some equivalent function) to plot a legend on the figure margin? 3. Any other way to plot either symbols or a

Suppose x and y are numeric vectors of the same length. plot(x,y) #scatterplot lmObj1 <- lm(y~x) # best fit line abline(lmObj1) # good lmObj2 <- lm(x~y) #get best fit but with axes interchanged abline(lmObj2) # not what I want. I want the correct line, drawn on the same graph, but with # response and predictor variables interchanged One way to proceed would be to

Hello: If anyone could guide me with this I would greatly appreciate it. Thanking you in advance for your assistance. Using a 3-level input factor alternative so that a function(below) can compute both a two-sided and one-sided p-values. Making the two-sided test the default. And produce output information about which alternative was tested. Where would I place the ifelse statement?

Dear R users, The parameters xaxs and yaxs (function par, package graphics) seem not to work with the function hist (package graphics), even when the parameters xlim and ylim are defined. Is there any way to make yaxs="i" and xaxs="i" work properly with the function hist, mainly to produce histograms that "touch" the horizontal axis? The R documentation and the R

Dear friends. On p 95 in 3. ed. MASS a zero-truncated Poisson distribution is analyzed. I understand the probability distribution and expected mean. The Newton iteration scheme is Lam(m+1)=Lam(m)-[Lam(m)-Ybar(1-exp(-Lam(m))]/[1-Ybar*exp(-Lam(m)], and I suppose the latter part should be f(Lam(m))/f ' (Lam(m)) and f(Lam(m)) is Lam(m)/(1-exp(-Lam(m)), right ? But then f ' (Lam(m)) is

Dear R-list members, I have just downloaded R version 2.11.0. Then I installed package gdata. At the end of the installation, a warning message said that package gtools could not be found. Package gdata was, after the installation, included in the "Package Index" in the help files. Messages during installation (which was made through the menu Packages / Instal package(s), choosing the

Here is my interaction with R: > sub(x='>|t|',pattern = '|t',replacement='zz') [1] "zz>|t|" So I say to myself "Clearly the | signs need to be escaped, so let's try this" > sub(x='>|t|',pattern = '\|t',replacement='zz') [1] "zz>|t|" Warning messages: 1: '\|' is an unrecognized escape in a

I have a few hundred files of formatted data. Unfortunately most of them end with a spurious CONTROL-Z. I want to rewrite the files without the spurious character. Here's what I've come up with so far, but my code is unsafe because it assumes without justification that the last row of df contains a control character (and some NAs to fill up the record). options(warn=-1) #turn off

Dear Mac users, Hi, as you might have probably read the thread of "[R] Rsquared in summary(lm)" on May 10, it seems that Mac version of lm() seem to be working incorrectly. I enclose the script to produce the result both for lm() and manual calculation for a simple regression. Could you run the script and report with the version of R, so I don't have to go through every builds

This was sent to me by someone on the R-list ( I don't know her ) but I don't have time to look at this right now so I told her I would send it to the R-list because she said it keeps getting bounced when she sends it. #======================================================================= ==================================================================== I am a bit confused with

Is this how a t hypothesis test is done when I don't have the actual data, but just the summarized statistics: > #Homework 9.2.6 [1] > n<-31 > xbar<-3.10 > s_x<-1.469 > m<-57 > ybar<-2.43 > s_y<-1.35 > s_pooled<- (((n-1)*s_x^2) + ((m-1)*s_y^2)) / (n + m - 2) > s_pooled [1] 1.939521 > t_obs <- (xbar - ybar) / (s_pooled * (sqrt(1/n + 1/m)))