nif( (to-from)/100, 1 ),
orient="horiz")
tkpack(img,s)
}
tkcurve( function(x) sqrt(x), 0.5, 10 )
tkcurve( function(x) sin(x)*x, -2*pi, 4*pi )
From: [EMAIL PROTECTED] on behalf of Ron Michael
Sent: Fri 4/20/2007 12:03 AM
To: r-help@stat.math.ethz.
suggestion?
Thanks and regards,
- Original Message
From: Greg Snow <[EMAIL PROTECTED]>
To: Ron Michael <[EMAIL PROTECTED]>; r-help@stat.math.ethz.ch
Sent: Thursday, April 19, 2007 11:03:43 PM
Subject: RE: [R] Problem with ?curve
Something along these lines is on my todo
IL PROTECTED] On Behalf Of Ron Michael
> Sent: Thursday, April 19, 2007 1:16 AM
> To: r-help@stat.math.ethz.ch
> Subject: Re: [R] Problem with ?curve
>
> Dear all R users,
>
> Thank you Gabor, and Mark for spending some times on my
> problem. But I want to move litt
ne give me any suggestion? Your help will be highly appreciated.
Thanks and regards,
- Original Message
From: Gabor Grothendieck <[EMAIL PROTECTED]>
To: Ron Michael <[EMAIL PROTECTED]>
Cc: r-help@stat.math.ethz.ch
Sent: Wednesday, April 18, 2007 10:08:32 PM
Subject: Re: [
Your chipply function is not vectorized. See ?curve and try:
curve(Vectorize(chippy)(x), 1, 20, n=200)
On 4/18/07, Ron Michael <[EMAIL PROTECTED]> wrote:
>
> Dear all R gurus,
>
>
>
> I have following syntax:
>
>
>
> y = c(1:10)
> chippy <- function(x)
>{
> y[5] = x
> sin
Dear all R gurus,
I have following syntax:
y = c(1:10)
chippy <- function(x)
{
y[5] = x
sin(cos(t(y)%*%y)*exp(-t(y)%*%y/2))
}
curve(chippy, 1, 20, n=200)
But I am getting error while executing :
Error in xy.coords(x, y, xlabel, ylabel, log) :
