login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A184864 Numbers m such that prime(m) is of the form floor(n+nr-r/2), where r=(1+sqrt(5))/2; complement of A184861. 4
4, 7, 13, 14, 17, 19, 26, 27, 29, 31, 33, 36, 41, 47, 50, 56, 58, 60, 65, 67, 69, 74, 77, 78, 83, 84, 85, 87, 88, 91, 94, 95, 97, 100, 104, 106, 108, 110, 113, 114, 117, 119, 121, 123, 128, 129, 135, 138, 139, 142, 143, 145, 146, 148, 150, 152, 155, 160, 163, 166, 167, 169, 174, 176, 177, 180, 183, 186, 187, 190, 191, 195, 196, 198, 201, 203, 207, 209, 211, 216, 220, 221, 222, 224, 227, 228, 235, 239, 243, 244, 246, 247 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,1
LINKS
MATHEMATICA
r=(1+5^(1/2))/2;
a[n_]:=Floor [n+n*r-r/2];
Table[a[n], {n, 1, 120}] (* A007064 *)
t1={}; Do[If[PrimeQ[a[n]], AppendTo[t1, a[n]]], {n, 1, 600}]; t1
t2={}; Do[If[PrimeQ[a[n]], AppendTo[t2, n]], {n, 1, 600}]; t2
t3={}; Do[If[MemberQ[t1, Prime[n]], AppendTo[t3, n]], {n, 1, 300}]; t3
*( Lists t1, t2, t3 match A184862, A184863, A184864.)
CROSSREFS
Sequence in context: A051456 A283626 A345741 * A031142 A266568 A244436
KEYWORD
nonn
AUTHOR
Clark Kimberling, Jan 23 2011
STATUS
approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 29 09:32 EDT 2024. Contains 371268 sequences. (Running on oeis4.)