A066284 a(n) = A066135(4*n).
34, 84, 34, 84, 34, 194, 34, 84, 34, 84, 34, 228, 34, 84, 34, 84, 34, 194, 34, 84, 34, 84, 34, 228, 34, 84, 34, 84, 34, 194, 34, 84, 34, 84, 34, 386, 34, 84, 34, 84, 34, 194, 34, 84, 34, 84, 34, 228, 34, 84, 34, 84, 34, 194, 34, 84, 34, 84, 34, 228, 34, 84, 34, 84, 34, 194
Offset: 1
Keywords
Examples
First 3 terms correspond to entries of other sequences as follows: a(1)=A046763(2), a(2)=A055712(2), a(3)=A055716(2).
From _Michael De Vlieger_, Jul 17 2017: (Start)
First position of values, with observations pertaining to values for 1 <= n <= 3000:
Value Position Observations:
--------------------------------
34 1 All odd.
84 2 In A047235.
194 6 In A017593.
228 12
386 36
1282 72
1538 144
3084 288
147468 576
1956 864
1046532 1152
24578 2304
3252 2880
(End)
Links
- Michael De Vlieger, Table of n, a(n) for n = 1..1000
Programs
-
Mathematica
Table[m = 2; While[Mod[DivisorSigma[4 n, m], m] > 0, m++]; m, {n, 66}] (* Michael De Vlieger, Jul 17 2017 *) -
PARI
a(n) = {n *= 4; my(m = 2); while (sigma(m, n) % m, m++); m;} \\ Michel Marcus, Oct 02 2016
Formula
a(n) = Min{x : sigma_4n(x) mod x = 0, x > 1}
Comments