A076602 a(1)=7, a(n_even)=(a(n-1)^2-1)/2; a(n_odd)=a(n-1)+1.

7, 24, 25, 312, 313, 48984, 48985, 1199765112, 1199765113, 719718163185951384, 719718163185951385, 258997117209879873736794713791709112, 258997117209879873736794713791709113, 33539753361514126736178628392779244498735703225085922505721228803623384

Offset: 1

Author

Zak Seidov, Oct 21 2002

Keywords

• easy
• nonn

Comments

{7, 24, 25}, {25, 312, 313}, {313, 48984, 48985}... are sides {a

Programs

Mathematica

nxt[{a_,b_}]:={a+1,If[OddQ[a],(b^2-1)/2,b+1]}; Transpose[NestList[nxt,{1,7},15]][[2]] (* Harvey P. Dale, Dec 13 2011 *)

Extensions

More terms from Harvey P. Dale, Dec 13 2011

Started in 1964 by Neil J. A. Sloane | Maintained by The OEIS Foundation Inc.

Content is available under The OEIS End-User License Agreement.