1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
|
\name{jiggle}
\alias{jiggle}
\title{ Calculate equally spaced values within a range. }
\description{
Calculates a specified number of equally spaced values in a range
}
\usage{
jiggle(n,range=c(-1,1))
}
\arguments{
\item{n}{The number of values to calculate.}
\item{range}{The range within which to fit the values.}
}
\details{
\samp{jiggle} is an alternative to the \samp{jitter} function. Instead
of using \samp{runif} to provide the values, it calls \samp{sample}
and then scales the resulting values to the range specified. This
guarantees that the values will be evenly spaced.
}
\value{ A vector of n values within the range specified. }
\author{Jim Lemon}
\examples{
ahw.df<-data.frame(Age=rnorm(100,35,10),
Height=rnorm(100,160,15),Weight=rnorm(100,75,20))
par(mfrow=c(1,3))
boxplot(ahw.df$Age,main="Age")
points(jiggle(100,c(0.5,1.5)),ahw.df$Age,col="red")
boxplot(ahw.df$Height,main="Height")
points(jiggle(100,c(0.5,1.5)),ahw.df$Height,col="green")
boxplot(ahw.df$Weight,main="Weight")
points(jiggle(100,c(0.5,1.5)),ahw.df$Weight,col="blue")
}
\keyword{misc}
|
