login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A048586 Pisot sequence L(6,8). 3
6, 8, 11, 16, 24, 36, 54, 81, 122, 184, 278, 421, 638, 967, 1466, 2223, 3371, 5112, 7753, 11759, 17835, 27051, 41030, 62233, 94394, 143176, 217169, 329402, 499638, 757853, 1149515, 1743590, 2644686, 4011473, 6084623, 9229188, 13998881, 21233577, 32207203 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,1

LINKS

Colin Barker, Table of n, a(n) for n = 0..1000

Index entries for Pisot sequences

MAPLE

L := proc(a0, a1, n)

    option remember;

    if n = 0 then

        a0 ;

    elif n = 1 then

        a1;

    else

        ceil( procname(a0, a1, n-1)^2/procname(a0, a1, n-2)) ;

    end if;

end proc:

A048586 := proc(n)

    L(6, 8, n) ;

end proc: # R. J. Mathar, Feb 12 2016

PROG

(PARI) pisotL(nmax, a1, a2) = {

  a=vector(nmax); a[1]=a1; a[2]=a2;

  for(n=3, nmax, a[n] = ceil(a[n-1]^2/a[n-2]));

  a

}

pisotL(50, 6, 8) \\ Colin Barker, Aug 07 2016

CROSSREFS

Subsequence of A048583. See A008776 for definitions of Pisot sequences.

Sequence in context: A020716 A020937 A183208 * A080824 A100602 A183979

Adjacent sequences:  A048583 A048584 A048585 * A048587 A048588 A048589

KEYWORD

nonn

AUTHOR

David W. Wilson

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent | More pages
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified October 15 05:56 EDT 2018. Contains 316202 sequences. (Running on oeis4.)