login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A089724 Numbers p satisfying the following conditions: p is a prime of form 10k+9 and the function f[p,7,10] applied to p is not greater than 5, where f[p,7,10]=10*fractionalpart[n/70]=1*.((n/70)-Floor[n/70]). 0
19, 29, 79, 89, 149, 229, 239, 359, 379, 439, 449, 499, 509, 569, 659, 709, 719, 859, 919, 929, 1009, 1069, 1129, 1279, 1289, 1409, 1429, 1489, 1499, 1549, 1559, 1619, 1699, 1709, 1759, 1979, 2039, 2129, 2179, 2269, 2339, 2389, 2399, 2459, 2539, 2549 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

LINKS

Table of n, a(n) for n=1..46.

MATHEMATICA

f[x_, d_, m_] := Mod[x/d, m] or alternatively f[x_, d_, m_] := m*(x/(d*m)-Floor[x/(d*m)]); Do[If[PrimeQ[n]&&Equal[Mod[n, 10], 9]]&&!Greater[f[n, 7, 10], 5], Print[n]], {n, 1, 1000}]

CROSSREFS

Cf. A034433.

Sequence in context: A088998 A181606 A139886 * A265804 A276732 A038542

Adjacent sequences:  A089721 A089722 A089723 * A089725 A089726 A089727

KEYWORD

nonn

AUTHOR

Roger L. Bagula, Jan 07 2004

EXTENSIONS

Edited by Labos, E., Jan 24 2004

STATUS

approved

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

License Agreements, Terms of Use, Privacy Policy. .

Last modified June 19 19:03 EDT 2019. Contains 324222 sequences. (Running on oeis4.)