A225049 Numbers that can be expressed as n plus sum of squared digits(n) in more than one way.

30, 41, 56, 81, 95, 96, 98, 101, 112, 114, 121, 125, 131, 142, 146, 152, 157, 168, 173, 177, 182, 186, 191, 196, 197, 199, 206, 209, 213, 215, 216, 217, 227, 230, 232, 234, 240, 243, 245, 247, 248, 257, 260, 262, 266, 272, 276, 284, 285, 287, 292, 299, 300

Offset

1,1

Links

Christian N. K. Anderson, Table of n, a(n) for n = 1..10000

Christian N. K. Anderson, All the integers that yield a(n) for n=1..10000

Example

a(13) = 131 is included because 131 = 57+5^2+7^2 = 73+7^2+3^2 = 105+1^2+5^2 = 122 + 1^2+4^2+4^2.

Prog

(R) digsqsum<-function(x) sum(as.numeric(unlist(strsplit(as.character(x), split="")))^2)
1:500+sapply(1:500, digsqsum)->y
table(y)->ty; names(ty[ty>1])

Crossrefs

Cf. A225048, A003052, A003219, A003132, A062028, A066568.

Sequence in context: A181638 A166650 A275193 * A043120 A039297 A043900

Adjacent sequences: A225046 A225047 A225048 * A225050 A225051 A225052

Keyword

nonn,base

Author

Kevin L. Schwartz and Christian N. K. Anderson, Apr 25 2013

Status

approved