The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation. Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A133403 Integer pair values {n,m} near the line: m=-Log/Log + (Log/Log)*n Based on musical scales of the Pythagorean triangle type{2,3,Sqrt} where 3^n/2^m is near 2. The line gives values of 2 exactly for real numbers. 1
 12, 18, 41, 64, 53, 83, 94, 148, 106, 167, 147, 232, 159, 251 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,1 COMMENTS Identity: 3^x/2^(-Log/Log + (Log/Log) x)==2 More inclusive Identity: ( any a0,b0,x) a0^x/b0^(-Log/Log[b0] + (Log[a0]/Log[b0]) x)==2 This sequence is based on the traditional Pythagorean musical scale. LINKS FORMULA {n,m}: If m=-Log/Log + (Log/Log)*n is 1% from the Integer m EXAMPLE {12, 18, 2.02729}, {41, 64, 1.97721}, {53, 83, 2.00418}, {94, 148, 1.98134}, {106, 167, 2.00837}, {147, 232, 1.98548}, {159, 251, 2.01257} MATHEMATICA g[x_] = -Log/Log + (Log/Log) x; Delete[Union[Table[Flatten[Table[If[(g[n] - 0.02) <= m && (g[n] + 0.02 >= m), {n, m}, {}], {n, 1, m}], 1], {m, 1, 300}]], 1] Flatten[%] CROSSREFS Cf. A132313. Sequence in context: A230354 A197464 A124205 * A152615 A258088 A259263 Adjacent sequences:  A133400 A133401 A133402 * A133404 A133405 A133406 KEYWORD nonn,uned AUTHOR Roger L. Bagula, Nov 24 2007 EXTENSIONS This appears to be a mixture of two sequences? - N. J. A. Sloane, Nov 25 2005 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
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified July 2 14:41 EDT 2020. Contains 335401 sequences. (Running on oeis4.)