# Greetings from The On-Line Encyclopedia of Integer Sequences! http://oeis.org/ Search: id:a046412 Showing 1-1 of 1 %I A046412 #37 Feb 16 2025 08:32:39 %S A046412 9,18,22,27,36,42,44,45,54,63,66,72,78,81,84,88,90,99,108,110,111,117, %T A046412 126,132,135,144,153,154,156,162,168,171,176,180,189,198,205,207,210, %U A046412 216,220,222,225,234,242,243,252,261,264,270,272,279,286,288,294,297,306,308,312,315,324,330,333,336,342,351,352 %N A046412 Lengths of nonsquarefree repunits. %C A046412 This is the set of all positive multiples of all positive members of A087094. What is the asymptotic density of this set? - _Jeppe Stig Nielsen_, Dec 28 2015 %H A046412 P. De Geest, Repunits prime factors %H A046412 Eric Weisstein's World of Mathematics, Repunit %F A046412 a(n)=k where (10^k-1)/9 is not squarefree. - _Ray Chandler_, Aug 10 2003 %p A046412 remove(t -> numtheory:-issqrfree((10^t-1)/9), [$1..90]); # _Robert Israel_, Dec 30 2015 %t A046412 Select[Range[300],!SquareFreeQ[(10^#-1)/9]&] (* _Harvey P. Dale_, Jun 26 2013 *) %o A046412 (PARI) isok(n) = ! issquarefree((10^n-1)/9); \\ _Michel Marcus_, Dec 31 2015 %Y A046412 Cf. A000042, A004022, A046053, A084006, A087094. %K A046412 nonn,base %O A046412 1,1 %A A046412 _Patrick De Geest_, Jul 15 1998 %E A046412 Terms to a(60) from _Ray Chandler_, Aug 10 2003 %E A046412 a(61)-a(67) from _Max Alekseyev_, Apr 29 2022 # Content is available under The OEIS End-User License Agreement: http://oeis.org/LICENSE