|
|
A114978
|
|
Numbers k such that (j^k + k^j) == 0 (mod k+j), j=3 case.
|
|
7
|
|
|
1, 3, 5, 6, 7, 8, 9, 15, 21, 24, 27, 33, 36, 39, 51, 63, 69, 75, 81, 87, 99, 105, 111, 114, 118, 123, 135, 153, 165, 171, 183, 207, 213, 219, 231, 243, 249, 255, 267, 279, 309, 315, 348, 351, 363, 375, 387, 393, 399, 423, 435, 453, 465, 471, 495, 501
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
MATHEMATICA
|
Select[Range[600], Divisible[3^#+#^3, #+3]&] (* Harvey P. Dale, Nov 26 2019 *)
|
|
PROG
|
(PARI) isok(k, j=3) = (j^k+k^j) % (k+j) == 0; \\ Michel Marcus, Oct 10 2013
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|