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

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A117623 Values of k associated with A117622. 1

%I #8 Mar 18 2014 11:52:32

%S 3,2,4,-1,5,-6,7,9,-12,8,10,-14,11,13,-22,15,16,-28,17,18,-34,20,21,

%T -38,19,24,-42,25,-23,26,27,-49,30,29,-57,31,33,-63,35,32,-66,36,39,

%U -72,37,40,-71,41,43,-83,44,45,-87,46,47,-91,50,-48,52,51,-100,53,54,-105,55,56,-110,59,58,-115,60

%N Values of k associated with A117622.

%C Does every positive number appear as an absolute value?

%t f[s_] := Block[{k = 1, d = Abs[Most@s - Rest@s], l = Last@s}, While[ PrimeQ[k] || MemberQ[s, k] || MemberQ[d, Abs[l - k]], k++ ]; Append[s, k]]; t = Nest[f, {1}, 71]; Rest@t - Most@t (* _Robert G. Wilson v_, Jun 13 2006 *)

%K sign

%O 1,1

%A _Amarnath Murthy_, Apr 08 2006

%E More terms from _Jonathan Vos Post_, Apr 10 2006

%E Corrected and extended by _Robert G. Wilson v_, Jun 13 2006

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.

License Agreements, Terms of Use, Privacy Policy. .

Last modified June 24 10:07 EDT 2024. Contains 373674 sequences. (Running on oeis4.)