Logo

Greetings from The On-Line Encyclopedia of Integer Sequences!

Hints

Search: id:A093178
Displaying 1-1 of 1 results found. page 1
     Format: long | short | internal | text      Sort: relevance | references | number      Highlight: on | off
A093178 If n is even then 1, otherwise n. +0
10
1, 1, 1, 3, 1, 5, 1, 7, 1, 9, 1, 11, 1, 13, 1, 15, 1, 17, 1, 19, 1, 21, 1, 23, 1, 25, 1, 27, 1, 29, 1, 31, 1, 33, 1, 35, 1, 37, 1, 39, 1, 41, 1, 43, 1, 45, 1, 47, 1, 49, 1, 51, 1, 53, 1, 55, 1, 57, 1, 59, 1, 61, 1, 63, 1, 65, 1, 67, 1, 69, 1, 71, 1, 73, 1, 75, 1, 77, 1, 79, 1, 81, 1, 83, 1, 85 (list; graph; listen)
OFFSET

0,4

COMMENT

Continued fraction expansion for tan(1).

LINKS

Harry J. Smith, Table of n, a(n) for n=0,...,20000

Index entries for two-way infinite sequences

S. Plouffe, A Search for a mathematical expression for mass ratios using a large database. page 3.

G. Xiao, Contfrac

Index entries for continued fractions for constants

FORMULA

G.f.: (1+x-x^2+x^3)/(1-x^2)^2. a(-n)=(-1)^n*a(n).

(1/2) [ 1 + n + (1-n)*(-1)^n ]. - R. Stephan, Dec 02 2004

n^n mod (n+1) for n > 0. - Amarnath Murthy (amarnath_murthy(AT)yahoo.com), Apr 18 2004

Satisfies a(0) = 1, a(n+1) = a(n) + n if a(n) < n else a(n+1) = a(n)/n. - Amarnath Murthy (amarnath_murthy(AT)yahoo.com), Oct 29 2002

a(n)=((n+1)+(1-n)(-1)^n)/2 and have e.g.f. (1+x)cosh(x). - Paul Barry (pbarry(AT)wit.ie), Apr 09 2003

a(n)=C(n,2*floor(n/2)); - Paul Barry (pbarry(AT)wit.ie), Dec 28 2006

a(n)=C(n,(n mod 2)). - Paolo P. Lava (ppl(AT)spl.at), Aug 29 2007

Starting (1, 1, 3, 1, 5, 1, 7,...) = A133080^(-1) * [1,2,3,...]. - Gary W. Adamson (qntmpkt(AT)yahoo.com), Sep 08 2007

Contribution from Johannes W. Meijer (meijgia(AT)hotmail.com), Jun 18 2009: (Start)

a(n) = denom(b(n+2)/b(n+1)) with b(n) = product((2*n-3-2*k), k=0..floor(n/2-1)).

(End)

EXAMPLE

1.557407724654902230506974807... = 1 + 1/(1 + 1/(1 + 1/(3 + 1/(1 + ...)))) [From Harry J. Smith (hjsmithh(AT)sbcglobal.net), Jun 13 2009]

PROGRAM

(PARI) a(n)=if(n%2, n, 1)

(PARI) { allocatemem(932245000); default(realprecision, 79000); x=contfrac(tan(1)); for (n=0, 20000, write("b093178.txt", n, " ", x[n+1])); } [From Harry J. Smith (hjsmithh(AT)sbcglobal.net), Jun 13 2009]

CROSSREFS

Equals |A009001(n)|.

Cf. A133080.

Cf. A049471 Decimal expansion. A009001. [From Harry J. Smith (hjsmithh(AT)sbcglobal.net), Jun 13 2009]

Contribution from Johannes W. Meijer (meijgia(AT)hotmail.com), Jun 18 2009: (Start)

Cf. A161738

(End)

Sequence in context: A147661 A155457 A009001 this_sequence A093411 A147088 A118402

Adjacent sequences: A093175 A093176 A093177 this_sequence A093179 A093180 A093181

KEYWORD

nonn

AUTHOR

Michael Somos, Mar 27 2004

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 November 22 20:51 EST 2009. Contains 167312 sequences.


AT&T Labs Research