%I #12 Mar 08 2020 18:51:56
%S 7,10,14,19,25,32,40,50,62,76,93,113,137,166,201,243,293,353,425,511,
%T 614,737,884,1060,1271,1524,1827,2190,2625,3146,3770,4517,5412,6484,
%U 7768,9306,11148,13354,15996,19160,22949,27487,32922,39431,47226,56561,67741,81130
%N Pisot sequence T(7,10), a(n) = floor(a(n-1)^2/a(n-2)).
%H Colin Barker, <a href="/A020752/b020752.txt">Table of n, a(n) for n = 0..1000</a>
%t nxt[{a_,b_}]:={b, Floor[b^2/a]}; NestList[nxt,{7,10},50][[All,1]] (* _Harvey P. Dale_, Mar 08 2020 *)
%o (PARI) pisotT(nmax, a1, a2) = {
%o a=vector(nmax); a[1]=a1; a[2]=a2;
%o for(n=3, nmax, a[n] = floor(a[n-1]^2/a[n-2]));
%o a
%o }
%o pisotT(50, 7, 10) \\ _Colin Barker_, Jul 29 2016
%Y See A008776 for definitions of Pisot sequences.
%K nonn
%O 0,1
%A _David W. Wilson_