Displaying 3 results from an estimated 3 matches for "yaxmax".
Did you mean:
xmax
2008 Apr 22
3
Using the 'by' function within a 'for' loop
...me(tx=x$tx[1],day=x$day[1],mn=mn,std=std,lowb=lowb,upb=upb,se=se)
})
summ<-do.call("rbind",summ)
#Definining x axis range
xmax<-unique(max(summ$day,na.rm=TRUE))
xmin<-unique(min(summ$day,na.rm=TRUE))
yaxmin<-unique(min(summ$lowb))
yaxmax<-unique(max(summ$upb))
plot(1,1,type='n',xlab='Day',xlim=c(xmin,xmax),ylim=c(yaxmin,yaxmax),
ylab=k,
las=1,cex.lab=1,xaxp=c(xmin,xmax,diff(range(c(xmin,xmax)))))
points(summ$day,summ$mn)
}
Where variable is a vector that specifies all th...
2009 Jan 09
0
Graph Script/X-axis label Problem
...h to the
x-axis? Can anyone see what is going wrong?
SCRIPT:
fish<-read.csv(file="C:/Documents and Settings/darej/My
Documents/James/R/fishmany.csv",sep=",",head=T)
x.sp <- split(fish, list(fish$Species, fish$Stock))
for (i in x.sp){
par(mar = c(7, 6, 4, 2) + 0.1)
yaxmax=(max(i$TACC, i$Catch))*1.2
mp <- barplot(i$TACC, xaxt="n",
main=paste(i$Stock[1]),space=0,xlab="",ylab="",ylim=c(0,max(i$TACC,
i$Catch))*1.2)
axis(1, labels = FALSE)
labels <- paste(i$Year, sep = " ")
text(mp, par("usr")[1] - 0, srt = 45, cex...
2008 Apr 21
0
Using the 'by' function withing a 'for' loop
...me(tx=x$tx[1],day=x$day[1],mn=mn,std=std,lowb=lowb,upb=upb,se=se)
})
summ<-do.call("rbind",summ)
#Definining x axis range
xmax<-unique(max(summ$day,na.rm=TRUE))
xmin<-unique(min(summ$day,na.rm=TRUE))
yaxmin<-unique(min(summ$lowb))
yaxmax<-unique(max(summ$upb))
plot(1,1,type='n',xlab='Day',xlim=c(xmin,xmax),ylim=c(yaxmin,yaxmax),
ylab=k,
las=1,cex.lab=1,xaxp=c(xmin,xmax,diff(range(c(xmin,xmax)))))
points(summ$day,summ$mn)
}
Where variable is a vector that specifies all th...