Displaying 7 results from an estimated 7 matches for "newplot".
2007 Jul 24
1
ggplot2 axis color
Hi:
Does anyone have an idea on how to color the axis and
labels using ggplot2? This is what I got:
library(ggplot2)
p <- qplot(total_bill, tip, data = tips)
NewPlot<- p + geom_abline(slope=c(0.1,0.15,0.2),
colour=c("red","blue","yellow"),size=c(2,5,2))
NewPlot + geom_smooth(colour="green",
size=3,linetype=3)
NewPlot$background.fill<-"cornsilk"
NewPlot$background.colour <- "blue"
NewPlot$axi...
2002 Nov 08
0
Polar plot, circular plot (angular data): II
...$standard.plot()
pp$wind.plot() # will not execute unless pp$default() has been called (in this case by the proceeding plot-commands)
pp$grid.circle.pos<-c(0,25,50)
pp$wind.plot()
# overlay polygons and lines
pp$r <- rnorm(50,35)
pp$default()
pp$rupper<-50
pp$basis()
pp$newplot()
pp$plot.polygon(col="darkgreen", border="darkgreen")
pp$r <- rnorm(50,15)
pp$plot.polygon(col="white", border="white")
pp$r <- rnorm(50,0) * 4 + 28
pp$plot.lines(lwd = 2, type="o", col="red")
pp$plot.grid.labels()
title(ma...
2012 Oct 11
2
struggling with R2wd or SWord? Try rtf!
...he iris data using the addTable()
function.\n")
tab <- table(iris$Species, floor(iris$Sepal.Length))
names(dimnames(tab)) <- c("Species", "Sepal Length")
addTable(rtf, tab, font.size=10, row.names=TRUE, NA.string="-",
col.widths=c(1, 0.5, 0.5, 0.5, 0.5) )
newPlot <- function() {
par(pty="s", cex=0.7)
plot(iris[, 1], iris[, 2])
abline(h=2.5, v=6.0, lty=2)
}
addPageBreak(rtf)
addPlot(rtf, plot.fun=newPlot, width=5, height=5, res=300)
addNewLine(rtf)
addParagraph(rtf, "Figure 1. Plot of the iris data using the...
2006 Feb 15
1
S3 generics without NS and cleanEx()
...o = TRUE))
R> ### * <HEADER>
R> ###
R> attach(NULL, name = "CheckExEnv")
R> assign(".CheckExEnv", as.environment(2), pos = length(search())) # base
R> ## add some hooks to label plot pages for base and grid graphics
R> setHook("plot.new", ".newplot.hook")
R> setHook("persp", ".newplot.hook")
R> setHook("grid.newpage", ".gridplot.hook")
R>
R> assign("cleanEx",
+ function(env = .GlobalEnv) {
+ rm(list = ls(envir = env, all.names = TRUE), envir = env)
+ RNG...
2004 Aug 10
0
Check failed after compilation (PR#7159)
...r interface to help.
Type 'q()' to quit R.
> ### * <HEADER>
> ###
> attach(NULL, name = "CheckExEnv")
> assign(".CheckExEnv", as.environment(2), pos = length(search())) # base
> ## add some hooks to label plot pages, at least for base graphics
> .newplot.hook <- function()
+ {
+ pp <- par(c("mfg","mfcol","oma","mar"))
+ if(all(pp$mfg[1:2] == c(1, pp$mfcol[2]))) {
+ outer <- (oma4 <- pp$oma[4]) > 0; mar4 <- pp$mar[4]
+ mtext(paste("help(", ..nameEx, ")"...
2004 Oct 28
2
Errors during make check
On a SUN 280R running Solaris 9...
The configure and make steps completed without errors. But when I try to
perform the make check step, I get the following:
$ make check FORCE=FORCE
`Makedeps' is up to date.
running code in 'base-Ex.R' ...*** Error code 1
make: Fatal error: Command failed for target `base-Ex.Rout'
Current working directory /usr/local/R-2.0.0/tests/Examples
***
1999 Jun 28
3
using R interactively
1) Is it possible to erase data points, legends, and/or text
from an R plot?
2) What's the best way to find the closest data point to
what locator() returns?
For more background and some context on these questions, read on...
In using R interactively, I am displaying further details
about a specific data point when the user clicks on the
plot point.
Here's a simple example:
#