Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.
%I #6 Dec 03 2022 13:54:25
%S 0,2,4,5,7,9,10,12,14,15,17,19,20,22,24,25,27,29,30,32,34,36,38,41,43,
%T 46,48,51,53,56,58,61,63,66,68,70,72,74,75,77,79,80,82,84,85,87,89,90,
%U 92,94,95,97,99,100,102,104,106,108,111,113,116,118,121,123,126,128,131,133,136,138,140,142,144
%N Numbers k for which A276086(6*k) == 1 (mod 6), where A276086 is the primorial base exp-function.
%H <a href="/index/Pri#primorialbase">Index entries for sequences related to primorial base</a>
%F a(n) = A328632(n) / 6.
%o (PARI)
%o A358841(n) = { my(m=1, p=2); while(n, m *= (p^(n%p)); n = n\p; p = nextprime(1+p)); (1==(m%6)); };
%o isA358845(n) = A358841(6*n);
%Y Cf. A276086, A328632, A358840, A358841, A358844 (complement), A358846 (its characteristic function).
%K nonn
%O 1,2
%A _Antti Karttunen_, Dec 03 2022