A380486 Numbers not congruent to {0, 1, 2, 3, 4, 5} mod 30.
6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 96, 97, 98, 99, 100, 101, 102
Offset: 1
Links
- Index entries for linear recurrences with constant coefficients, signature (1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,-1).
Programs
-
Mathematica
Select[Range[0, 102], Mod[#, 30] > 5 &] (* Amiram Eldar, Feb 03 2025 *)
-
PARI
is_A380486(n) = !!((n\6)%5);
-
PARI
is_A380486(n) = ((n%30)>5);
Comments