|
|
A342806
|
|
Integers m such that A342805(m) = m+3.
|
|
0
|
|
|
15, 21, 78, 300, 528, 903, 990, 1830, 2628, 3240, 3570, 4278, 5253, 5460, 7503, 8778, 9870, 13203, 13530, 16653, 18528, 20100, 22578, 24753, 25200, 29403, 31878, 37128, 39903, 45753, 48828, 55278, 64980, 65703, 72390, 73920, 81003, 88410, 98790, 106953, 107880
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
EXAMPLE
|
For m=15, A177028 row is (15, 6, 3); 6*3 = 18 and 18-3 = 15, so 15 is a term.
|
|
PROG
|
(PARI) row(n)=my(v=List()); fordiv(2*n, k, if(k<2, next); if(k==n, break); my(s=(2*n/k-4+2*k)/(k-1)); if(denominator(s)==1, listput(v, s))); Vec(v); \\ A177028
f(n) = vecprod(row(n))/n; \\ A342805
isok(m) = f(m) == m+3;
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|