The On-Line Encyclopedia of Integer Sequences (OEIS)

Revision History for A078860 (Bold, blue-underlined text is an addition; faded, red-underlined text is a ~~deletion~~.)
Showing all changes.

A078860

Least positive residues [mod 210] representing those residue classes which can be lesser of prime pairs from A029710.
(history; published version)

#4 by N. J. A. Sloane at Tue Oct 15 22:31:46 EDT 2013

AUTHOR

_Labos E. (labos(AT)ana.sote.hu), Elemer_, Dec 13 2002

Discussion

Tue Oct 15

22:31

OEIS Server: https://oeis.org/edit/global/2029

#3 by N. J. A. Sloane at Fri Feb 24 03:00:00 EST 2006

MATHEMATICA

t=Flatten[Position[Table[GCD[w, 210], {w, 1, 210}], 1]] t2=Intersection[t, t+4]-4

KEYWORD

fini,full,nonn,new

#2 by N. J. A. Sloane at Tue Jan 24 03:00:00 EST 2006

KEYWORD

fini,full,nonn,new

AUTHOR

Labos E. (labos(AT)ana1ana.sote.hu), Dec 13 2002

#1 by N. J. A. Sloane at Fri May 16 03:00:00 EDT 2003

NAME

Least positive residues [mod 210] representing those residue classes which can be lesser of prime pairs from A029710.

DATA

7, 13, 19, 37, 43, 67, 79, 97, 103, 109, 127, 139, 163, 169, 187, 193

OFFSET

1,1

FORMULA

Intersection[RRS(210), 4+RRS{210)]-4 and {7}. RRS[210]=reduced residue system of 210=first 48=phi[210] terms of A008364; additional term 7 is a singular cases; 210k+r generates complete A029710 with suitable k and r taken from these 15+1 numbers.

MATHEMATICA

t=Flatten[Position[Table[GCD[w, 210], {w, 1, 210}], 1]] t2=Intersection[t, t+4]-4

CROSSREFS

Cf. A029710, A008364, A078859.

KEYWORD

fini,full,nonn

AUTHOR

Labos E. (labos(AT)ana1.sote.hu), Dec 13 2002

STATUS

approved