Logo

Greetings from The On-Line Encyclopedia of Integer Sequences!

Hints

Search: id:A006452
Displaying 1-1 of 1 results found. page 1
     Format: long | short | internal | text      Sort: relevance | references | number      Highlight: on | off
A006452 a(n)=6a(n-2)-a(n-4).
(Formerly M1245)
+0
4
1, 1, 2, 4, 11, 23, 64, 134, 373, 781, 2174, 4552, 12671, 26531, 73852, 154634, 430441, 901273, 2508794, 5253004, 14622323, 30616751, 85225144, 178447502, 496728541, 1040068261, 2895146102, 6061962064, 16874148071, 35331704123 (list; graph; listen)
OFFSET

0,3

COMMENT

Solution to a Diophantine equation.

n such that n^2-1 is a triangular number - Benoit Cloitre (benoit7848c(AT)orange.fr), Apr 05 2002

For all elements "x" of the sequence, 8*x^2 - 7 is a square. Lim n-> inf. a(n)/a(n-2) = 3 + Sqrt(8). If n is odd, Lim n -> inf. a(n)/a(n-1) = (9 + 2*Sqrt(8))/7. If n is even, Lim n -> inf. a(n)/a(n-1) = (11 + 3*Sqrt(8))/7. - Gregory V. Richardson (omomom(AT)hotmail.com), Oct 07 2002

REFERENCES

A. J. Gottlieb, How four dogs meet in a field, etc., Technology Review, Jul/Aug 1973 pp. 73-74.

J. O. Shallit, personal communication.

N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).

LINKS

S. Plouffe, Approximations de S\'{e}ries G\'{e}n\'{e}ratrices et Quelques Conjectures, Dissertation, Universit\'{e} du Qu\'{e}bec \`{a} Montr\'{e}al, 1992.

S. Plouffe, 1031 Generating Functions and Conjectures, Universit\'{e} du Qu\'{e}bec \`{a} Montr\'{e}al, 1992.

FORMULA

For n (even), a(n) = [ [(3 + Sqrt(8))^((n/2)+1) - (3 - Sqrt(8))^((n/2)+1)] - 2*[(3 + Sqrt(8))^((n/2)-1) - (3 - Sqrt(8))^((n/2)-1)] ] / (6*Sqrt(8)) For n (odd), a(n) = [ [(3 + Sqrt(8))^((n+1)/2) - (3 - Sqrt(8))^((n+1)/2)] - 2*[(3 + Sqrt(8))^((n-1)/2) - (3 - Sqrt(8))^((n-1)/2)] ] / (2*Sqrt(8)) - Gregory V. Richardson (omomom(AT)hotmail.com), Oct 07 2002

MAPLE

A006452:=-(z-1)*(z**2+3*z+1)/(z**2+2*z-1)/(z**2-2*z-1); [Conjectured by S. Plouffe in his 1992 dissertation. Gives sequence except for one of the leading 1's.]

MATHEMATICA

s=0; lst={1}; Do[s+=n; If[Sqrt[s+1]==Floor[Sqrt[s+1]], AppendTo[lst, Sqrt[s+1]]], {n, 0, 8!}]; lst [From Vladimir Orlovsky (4vladimir(AT)gmail.com), Apr 02 2009]

CROSSREFS

Cf. A006451, A006454.

Sequence in context: A026531 A038047 A061152 this_sequence A104430 A103669 A034485

Adjacent sequences: A006449 A006450 A006451 this_sequence A006453 A006454 A006455

KEYWORD

nonn,easy

AUTHOR

N. J. A. Sloane (njas(AT)research.att.com), Jeffrey Shallit

EXTENSIONS

More terms from James A. Sellers (sellersj(AT)math.psu.edu), May 03 2000

page 1

Search completed in 0.002 seconds

Lookup | Welcome | Find friends | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Transforms | Puzzles | Hot | Classics
More pages | Superseeker | Maintained by N. J. A. Sloane (njas@research.att.com)

Last modified December 10 12:37 EST 2009. Contains 170569 sequences.


AT&T Labs Research