OFFSET
1,4
COMMENTS
This sequence arises in several different contexts [Kramer].
The number of occurrences of k in the sequence is A296021(6*k) - A296021(6*k-6). - Robert Israel, Mar 31 2019
Original name was: "Floor( (q+19)/24 ) where q is a prime == 1 (mod 4)." - Robert Israel, Apr 07 2019
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
Jürg Kramer, On the linear independence of certain theta-series, Mathematische Annalen 281.2 (1988): 219-228. See page 226.
MAPLE
map(t -> floor((t+19)/24), select(isprime, [seq(i, i=1..1000, 4)])); # Robert Israel, Mar 31 2019
MATHEMATICA
Table[Floor[(q + 19)/24], {q, Select[Range[1, 650, 4], PrimeQ]}] (* Michael De Vlieger, Mar 31 2019 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Mar 31 2019
STATUS
approved