|
Search: id:A139477
|
|
| |
|
| 1, 3, 6, 8, 11, 13, 16, 18, 21, 23, 26, 29, 31, 34, 36, 39, 41, 44, 46, 49, 51, 54, 56, 59, 62, 64, 67, 69, 72, 74, 77, 79, 82, 84, 87, 90, 92, 95, 97, 100, 102, 105, 107, 110, 112, 115, 118, 120, 123, 125
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
MATHEMATICA
|
a = {}; Do[k = Length[IntegerDigits[Expand[((2*Sqrt[2] + 3)^(n) - (3 - 2*Sqrt[2])^(n))/(4*Sqrt[2])], 2]]; Print[k]; AppendTo[a, k], {n, 1, 50}]; a (*Artur Jasinski*)
|
|
CROSSREFS
|
Cf. A001109, A139473, A139474, A139475, A139476, A139478.
Sequence in context: A118011 A047219 A138373 this_sequence A122437 A090848 A004957
Adjacent sequences: A139474 A139475 A139476 this_sequence A139478 A139479 A139480
|
|
KEYWORD
|
base,nonn
|
|
AUTHOR
|
Artur Jasinski (grafix(AT)csl.pl), Apr 22 2008
|
|
|
Search completed in 0.002 seconds
|
