|
|
A084049
|
|
Numbers n such that n and n+1 have the same sum of digits of divisors; A034690(n) = A034690(n+1).
|
|
1
|
|
|
14, 49, 104, 118, 122, 213, 245, 296, 356, 424, 425, 459, 526, 537, 715, 878, 922, 969, 1003, 1065, 1085, 1138, 1202, 1275, 1334, 1335, 1431, 1445, 1581, 1605, 1614, 1625, 1642, 1886, 1941, 2055, 2247, 2264, 2295, 2421, 2566, 2585, 2769, 2870, 2914, 3054
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
Paolo P. Lava, Table of n, a(n) for n = 1..1000
|
|
MATHEMATICA
|
Flatten[Position[Partition[Table[Total[Flatten[IntegerDigits/@ Divisors[ n]]], {n, 4000}], 2, 1], _?(#[[1]]==#[[2]]&), {1}, Heads->False]] (* Harvey P. Dale, May 20 2013 *)
|
|
CROSSREFS
|
Sequence in context: A043163 A043943 A308834 * A251221 A302467 A303249
Adjacent sequences: A084046 A084047 A084048 * A084050 A084051 A084052
|
|
KEYWORD
|
base,easy,nonn
|
|
AUTHOR
|
Jason Earls, Jun 19 2003
|
|
STATUS
|
approved
|
|
|
|