|
%I #13 Jan 19 2015 13:53:01
%S 1,3,4,5,9,13,17,21,25,37,41,45,49,57,65,73,77,89,109,113,117,121,145,
%T 151,161,169,185,205,209,233,237,241,261,265,277,281,289,313,329,337,
%U 353,361,385,401,409,425,433,449,481,489,505,517,521,545,553,586,593
%N Numbers n such that (n^n+3)/(n+3) is an integer.
%H Chai Wah Wu, <a href="/A242800/b242800.txt">Table of n, a(n) for n = 1..10000</a>
%e (4^4+3)/(4+3) = 259/7 = 37 is an integer. Thus 4 is a member of this sequence.
%o (PARI) for(n=1,10^3,s=(n^n+3)/(n+3);if(floor(s)==s,print1(n, ", ")))
%o (Python)
%o A242800_list = [n for n in range(10**6) if pow(n, n, n+3) == n] # _Chai Wah Wu_, Jan 19 2015
%K nonn
%O 1,2
%A _Derek Orr_, May 23 2014
%E a(4) corrected by _Chai Wah Wu_, Jan 19 2015
|
