|
Search: id:A066598
|
|
|
| A066598 |
|
4-EPRNs (Equal Product Of Reversible Numbers): numbers which can be expressed as the product of two reversible numbers in four different ways. |
|
+0
1
|
|
| 1015560, 1446480, 1854720, 10155600, 14464800, 18547200, 51665040, 59552640, 67944240, 78127560, 82623060, 88560360, 95236960, 99497160, 101556000, 105094080, 108656860, 110937960, 117681480, 118072080, 124942090, 135647680
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
MATHEMATICA
|
f[n_] := (m = ToExpression[StringReverse[ToString[n]]]; If[n > m, n*m, 0]); a = Sort[ Table[ f[n], {n, 0, 10^6}]]; While[ a[[1]] == 0, a = Drop[a, 1]]; a[[ Select[ Range[ Length[a]] - 3, a[[ # ]] == a[[ # + 3 ]] & ]]]
|
|
CROSSREFS
|
Cf. A066531.
Sequence in context: A133219 A043643 A096931 this_sequence A074667 A143133 A159816
Adjacent sequences: A066595 A066596 A066597 this_sequence A066599 A066600 A066601
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Robert G. Wilson v (rgwv(AT)rgwv.com), Jan 08 2002
|
|
|
Search completed in 0.002 seconds
|
