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

 

Logo

Annual appeal: Please make a donation to keep the OEIS running! Over 6000 articles have referenced us, often saying "we discovered this result with the help of the OEIS".
Other ways to donate

Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A071176 Smallest k such that the concatenation n'k is a square (decimal notation). 5
6, 5, 6, 9, 29, 4, 29, 1, 61, 0, 56, 1, 69, 4, 21, 9, 64, 49, 6, 25, 16, 5, 104, 336, 6, 244, 225, 9, 16, 25, 36, 4, 64, 81, 344, 1, 21, 44, 69, 0, 209, 25, 56, 1, 369, 24, 61, 4, 284, 41, 84, 9, 29, 76, 225, 25, 6, 564, 29, 84, 504, 5, 504 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

COMMENTS

A071177(n) = A000196(n'a(n)).

LINKS

Reinhard Zumkeller, Table of n, a(n) for n = 1..10000

EXAMPLE

a(5) = 29 as 529 = 23^2 and 5'i is nonsquare for i<29, A071177(5)=23.

MATHEMATICA

nksq[n_]:=Module[{idn=IntegerDigits[n], k=0}, While[!IntegerQ[Sqrt[ FromDigits[Join[ idn, IntegerDigits[k]]]]], k++]; k]; Array[nksq, 70] (* Harvey P. Dale, Sep 28 2012 *)

PROG

(Haskell)

import Data.List (findIndex)

import Data.Maybe (fromJust)

a071176 n = fromJust $ findIndex (== 1) $

            map (a010052 . read . (show n ++) . show) [0..]

-- Reinhard Zumkeller, Aug 09 2011

CROSSREFS

Sequence in context: A126689 A243093 A101634 * A243091 A195786 A201330

Adjacent sequences:  A071173 A071174 A071175 * A071177 A071178 A071179

KEYWORD

nonn,base,nice,look

AUTHOR

Reinhard Zumkeller, May 15 2002

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 December 13 09:05 EST 2017. Contains 295957 sequences.