id:A058634 - OEIS Search Results

Search: id:A058634

Displaying 1-1 of 1 results found.

page 1

a(n) = floor(b(n)), where b(n) = 1/cos(b(n-1)), b(0) = 1.

+0
1

1, 1, -4, -2, 2, -2, 9, -2, 1, -4, -2, 1, -4, -2, 1, -4, -2, 1, -3, -2, 1, -3, -2, 1, -4, -2, 1, -4, -2, 2, -2, 12, 1, 1, -4, -2, 1, -3, -2, 2, -2, 8, -3, -2, -6, 1, 16, -3, -2, 7, -12, 1, -4, -2, 2, -3, -3, -3, -2, -6, 1, 2, -2, 2, -3, -2, -6, 1, 4, -3, -2, 9, -2, 2, -3, -2, -4, -2, 1, -3, -2, 1, -3, -2, 2, -3, -2, -7, 1, 4, -2, 70, 4, -2, 27 (list; graph; listen)

	OFFSET	`0,3`
	EXAMPLE	`a(3) = -2 because: b(0) = 1, b(1) = 1/cos(1) = 1.850815..., b(2) = 1/cos(1.850815) = -3.618291..., b(3) = 1/cos(-3.618291) = -1.125468... and a(3) = floor(b(3)) = -2`
	PROGRAM	`(PARI) \p1000 b=1:for(n=1, 100, print1(floor(b)", "):b=1/cos(b))`
	CROSSREFS	`Cf. A000319.` `Sequence in context: A080133 A054575 A129107 this_sequence A037919 A049849 A112349` `Adjacent sequences: A058631 A058632 A058633 this_sequence A058635 A058636 A058637`
	KEYWORD	`sign`
	AUTHOR	`Avi Peretz (njk(AT)netvision.net.il), Dec 26 2000`
	EXTENSIONS	`More terms from Ralf Stephan (ralf(AT)ark.in-berlin.de), Mar 23 2003`

page 1

Search completed in 0.002 seconds

Last modified December 1 19:22 EST 2009. Contains 167811 sequences.

AT&T Labs Research