login
4*prime(n) + (prime(n) mod 4).
5

%I #11 Mar 10 2016 18:35:49

%S 10,15,21,31,47,53,69,79,95,117,127,149,165,175,191,213,239,245,271,

%T 287,293,319,335,357,389,405,415,431,437,453,511,527,549,559,597,607,

%U 629,655,671,693,719,725,767,773,789,799,847,895,911,917,933,959,965

%N 4*prime(n) + (prime(n) mod 4).

%H Reinhard Zumkeller, <a href="/A075520/b075520.txt">Table of n, a(n) for n = 1..10000</a>

%F a(n) = A001749(n) + A039702(n).

%t 4#+Mod[#,4]&/@Prime[Range[60]] (* _Harvey P. Dale_, Mar 10 2016 *)

%o (Haskell)

%o a075520 n = a075520_list !! (n-1)

%o a075520_list = zipWith (+) a001749_list a039702_list

%o -- _Reinhard Zumkeller_, Feb 20 2012

%Y Cf. A000040, A039702.

%K nonn

%O 1,1

%A _Reinhard Zumkeller_, Sep 19 2002