|
| |
|
|
A094898
|
|
Product of two prime sets.
|
|
0
| |
|
|
7, 0, 0, 17, 0, 0, 0, 0, 0, 41, 0, 0, 0, 0, 0, 0, 71, 0, 0, 83, 0, 0, 0, 0, 101, 0, 0, 113, 0, 0, 0, 131, 0, 0, 0, 0, 0, 0, 0, 0, 167, 0, 0, 0, 0, 0, 0, 0, 197, 0, 0, 0, 0, 0, 0, 227, 0, 233, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 281, 0, 0, 0, 0, 0, 0, 311, 0, 317, 0, 0, 0, 0, 0, 0, 0, 0, 353, 0, 0, 0, 0
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
COMMENTS
| A kind of prime information topology of primes as a product of boths sets being true. This result is a very strange set.
|
|
|
FORMULA
| a(n) = when the linear combination of information of two prime types of 4*m+1 and 4*m+3 are both prime.
|
|
|
MATHEMATICA
| a=Table[If[PrimeQ[4*n+1]==True&&PrimeQ[4*n+3]==False, 1, 0], {n, 0, 200}] b=Table[If[PrimeQ[4*n+1]==False&&PrimeQ[4*n+3]==True, 1, 0], {n, 0, 200}] d=Table[If[PrimeQ[a[[n]]*(4*n+1)+b[[n]]*(4*n+3)]==True, a[[n]]*(4*n+1)+b[[n]]*(4*n+3), 0], {n, 1, 200}]
|
|
|
CROSSREFS
| Cf. A094896, A094897.
Sequence in context: A132712 A021592 A154102 * A136115 A061846 A199603
Adjacent sequences: A094895 A094896 A094897 * A094899 A094900 A094901
|
|
|
KEYWORD
| nonn,uned,obsc
|
|
|
AUTHOR
| Roger L. Bagula (rlbagulatftn(AT)yahoo.com), Jun 14 2004
|
| |
|
|
