login
Numbers k such that the number of partitions of k, A000041(k), is a multiple of 12.
5

%I #16 May 21 2022 08:42:09

%S 21,26,30,70,75,80,106,124,125,133,142,180,191,200,231,268,278,297,

%T 298,322,336,339,340,342,350,351,353,358,365,374,412,415,449,465,494,

%U 501,531,548,550,570,579,580,602,632,645,648,649,657,663,674,679,699

%N Numbers k such that the number of partitions of k, A000041(k), is a multiple of 12.

%H Amiram Eldar, <a href="/A035700/b035700.txt">Table of n, a(n) for n = 1..1000</a>

%t Select[Range[1000],Mod[PartitionsP[#],12]==0&] (* _Harvey P. Dale_, May 10 2019 *)

%o (PARI) is(n)=numbpart(n)%12==0 \\ _Charles R Greathouse IV_, Apr 08 2015

%Y Cf. A000041, A035701, A243935 (see crossrefs).

%K nonn

%O 1,1

%A _Olivier GĂ©rard_