# Re: [R] Fibonacci

From: Michael Dewey <info_at_aghmed.fsnet.co.uk>
Date: Thu, 21 Apr 2011 14:04:25 +0100

At 10:42 20/04/2011, Georgina Imberger wrote:
>Hi!
>
>I am trying to work out the code to get a Fibonacci sequence, using the
>while() loop and only one variable. And I can't figure it out.

> phi <- 0.5 * (1 + sqrt(5))
> phi
[1] 1.618034
> fib <- function(n) {(phi ^ n - (1 - phi) ^ n) / sqrt(5)}  > fib(1:10)
[1] 1 1 2 3 5 8 13 21 34 55
>

Admittedly this does not use a while loop as you requested

>Fibonacci<-c(1,1)
>while (max(Fibonacci)<500){
>Fibonacci<-c(Fibonacci, (max(Fibonacci) + ?(Fibanacci)))
>}
>
>
>How can I tell R to take the value one before the max value? (Without
>defining another variable)
>
>(Probably super easy... I am a beginner...)
>
>Thanks,
>Georgie
>
> [[alternative HTML version deleted]]

Michael Dewey
info_at_aghmed.fsnet.co.uk
http://www.aghmed.fsnet.co.uk/home.html

R-help_at_r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code. Received on Thu 21 Apr 2011 - 13:07:51 GMT

Archive maintained by Robert King, hosted by the discipline of statistics at the University of Newcastle, Australia.
Archive generated by hypermail 2.2.0, at Thu 21 Apr 2011 - 16:00:32 GMT.

Mailing list information is available at https://stat.ethz.ch/mailman/listinfo/r-help. Please read the posting guide before posting to the list.