|
Search: id:A110405
|
|
|
| A110405 |
|
A110404(k)/k where k is the corresponding number == 1,3,7 or 9 (mod 10). |
|
+0
2
|
|
| 1, 1, 1, 1, 1, 24087, 421865715983363, 48378522062732589, 5772, 140535792709705753184, 26936, 320445837687216997561825148, 4235907461713913326816552623, 1, 19929, 24087, 34491254
(list; graph; listen)
|
|
|
OFFSET
|
0,6
|
|
|
COMMENT
|
a(A002113(n)) = 1, for n>1.
|
|
EXAMPLE
|
The term corresponding to 13 is 24087 =313131/13.
|
|
MATHEMATICA
|
f[n_] := Block[{k = 1, id = Reverse[ IntegerDigits[n]]}, While[fd = FromDigits[ Flatten[ Table[id, {k}]]]; Mod[fd, n] != 0, k++ ]; fd/n]; lst = Select[ Range[1, 45, 2], Mod[ #, 5] != 0 &]; f /@ lst (* Robert G. Wilson v *)
|
|
CROSSREFS
|
Cf. A110404.
Sequence in context: A066234 A084691 A084692 this_sequence A078870 A140923 A025041
Adjacent sequences: A110402 A110403 A110404 this_sequence A110406 A110407 A110408
|
|
KEYWORD
|
base,easy,nonn
|
|
AUTHOR
|
Amarnath Murthy (amarnath_murthy(AT)yahoo.com), Jul 30 2005
|
|
EXTENSIONS
|
More terms from Robert G. Wilson v (rgwv(at)rgwv.com), Jul 30 2005
|
|
|
Search completed in 0.002 seconds
|
