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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A173517 a(n) = k if n is the k-th nonsquare, zero otherwise. 3
0, 0, 1, 2, 0, 3, 4, 5, 6, 0, 7, 8, 9, 10, 11, 12, 0, 13, 14, 15, 16, 17, 18, 19, 20, 0, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 0, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 0, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 0, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,4

COMMENTS

a(A000037(n)) = n; a(A000290(n)) = 0.

a(n)*A037213(n) = 0 for all n.

LINKS

Reinhard Zumkeller, Table of n, a(n) for n = 0..1000

FORMULA

a(n) = (1 - A010052(n))*A028391(n).

PROG

(Haskell)

a173517 n = (1 - a010052 n) * a028391 n

-- Reinhard Zumkeller, Dec 15 2013

(PARI) a(n)=if(issquare(n), 0, n-sqrtint(n)) \\ Charles R Greathouse IV, Sep 02 2015

CROSSREFS

Cf. A000037, A000196, A000290, A010052, A028391, A037213.

Sequence in context: A278029 A066246 A198370 * A109921 A139637 A243202

Adjacent sequences:  A173514 A173515 A173516 * A173518 A173519 A173520

KEYWORD

nonn,easy

AUTHOR

Reinhard Zumkeller, Feb 20 2010

EXTENSIONS

Definition revised by Reinhard Zumkeller, Dec 15 2013, at the suggestion of Antti Karttunen, who further edited the name

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 | More pages
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy .

Last modified April 25 19:05 EDT 2017. Contains 285426 sequences.