The OEIS is supported by the many generous donors to the OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A172357 n such that the Liouville function lambda(n) take successively, from n, the values 1,-1,1,-1,1,-1 1
 58, 185, 194, 274, 287, 342, 344, 382, 493, 566, 667, 856, 858, 926, 1012, 1014, 1157, 1165, 1230, 1232, 1234, 1267, 1318, 1385, 1393, 1418, 1482, 1484, 1679, 1681, 1795, 1841, 1915, 1917, 2060, 2062, 2064, 2232, 2340, 2342, 2567, 2569, 2627, 2805, 3013 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,1 LINKS Harvey P. Dale, Table of n, a(n) for n = 1..1000 MAPLE with(numtheory): for n from 1 to 4300 do; if (-1)^bigomega(n)=1 and (-1)^bigomega(n+1) = -1 and (-1)^bigomega(n+2) = 1 and (-1)^bigomega(n+3) = -1 and (-1)^bigomega(n+4) = 1 and (-1)^bigomega(n+5) = -1 then print(n); else fi ; od; MATHEMATICA Transpose[Transpose[#][[1]]&/@Select[Partition[Table[{n, LiouvilleLambda[ n]}, {n, 3100}], 6, 1], Transpose[#][[2]]=={1, -1, 1, -1, 1, -1}&]][[1]] Harvey P. Dale, May 19 2012 PROG (PARI) lambda(n)=(-1)^bigomega(n); for(n=1, 1e4, if(lambda(n)==1&lambda(n+1)==-1&lambda(n+2)==1&&lambda(n+3)==-1&lambda(n+4)==1&&lambda(n+5)==-1, print1(n", "))) /* Charles R Greathouse IV, Jun 13 2011 */ CROSSREFS Cf. A051470, A028488, A002819. Sequence in context: A235376 A067914 A250800 * A305156 A334186 A051972 Adjacent sequences: A172354 A172355 A172356 * A172358 A172359 A172360 KEYWORD nonn AUTHOR Michel Lagneau, Feb 01 2010 STATUS approved

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

Last modified April 17 13:58 EDT 2024. Contains 371764 sequences. (Running on oeis4.)