|
Search: id:A129122
|
|
| |
|
| 3, 38, 60, 62, 75, 107, 119, 132, 156, 164, 188, 213, 245, 300, 332, 357, 381, 389, 413, 426, 438, 470, 483, 485, 507, 542, 564, 566, 623, 651, 708, 710, 732, 767, 789, 791, 804, 836, 848, 861, 885, 893, 917, 942, 974, 1029, 1061, 1086, 1110, 1118, 1142, 1155
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
MATHEMATICA
|
f[n_] := Block[{c = 1, k = 4 n/3}, While[ ! IntegerQ[k], c++; k = 4*Ceiling[k]/3]; c]; Select[Range[2000], f[3*# + 1] == 7 &] - Stefan Steinerberger (stefan.steinerberger(AT)gmail.com), Aug 20 2007
|
|
CROSSREFS
|
Sequence in context: A122787 A119448 A093939 this_sequence A002405 A050394 A156071
Adjacent sequences: A129119 A129120 A129121 this_sequence A129123 A129124 A129125
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Benoit Cloitre (benoit7848c(AT)orange.fr), Aug 18 2007
|
|
EXTENSIONS
|
More terms from Stefan Steinerberger (stefan.steinerberger(AT)gmail.com), Aug 20 2007
|
|
|
Search completed in 0.002 seconds
|
