OFFSET
1,2
COMMENTS
EXAMPLE
The maximal antiruns of non-prime-powers begin:
1 6 10 12 14
15 18 20
21
22 24 26 28 30 33
34
35
36 38
39
40 42 44
45
46 48 50
MATHEMATICA
Select[Range[100], !PrimePowerQ[#]&&!PrimePowerQ[#-1]&]
CROSSREFS
Runs of prime-powers:
- length A174965
- min A373673
- max A373674
- sum A373675
Runs of non-prime-powers:
- length A110969
- min A373676
- max A373677
- sum A373678
Antiruns of prime-powers:
- length A373671
- min A120430
- max A006549
- sum A373576
Antiruns of non-prime-powers:
- length A373672
- min A373575 (this sequence)
- max A255346
- sum A373679
A356068 counts non-prime-powers up to n.
KEYWORD
nonn
AUTHOR
Gus Wiseman, Jun 18 2024
STATUS
approved