

A134742


Numbers whose square is a permutational number A134640.


2



0, 1, 15, 50, 85, 195, 327, 561, 789, 867, 1323, 1764, 2450, 2751, 3213
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,3


COMMENTS

A134741(n)^(1/2)=a(n)


LINKS

Table of n, a(n) for n=1..15.


MATHEMATICA

a = {}; b = {}; Do[AppendTo[b, n]; w =Permutations[b]; Do[j = FromDigits[w[[m]], n + 1]; If[IntegerQ[j^(1/2)], AppendTo[a, j]], {m, 1, Length[w]}], {n, 0, 7}]; Sqrt[a] (*Artur Jasinski*)


CROSSREFS

Cf. A134640, A134641, A134642, A134643, A134644, A023811, A134741.
Sequence in context: A199899 A020257 A103777 * A191746 A029941 A194851
Adjacent sequences: A134739 A134740 A134741 * A134743 A134744 A134745


KEYWORD

nonn


AUTHOR

Artur Jasinski, Nov 07 2007


STATUS

approved



