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!)
A302258 Decimal expansion of the second radiation constant c_2 in meter-kelvin. 0

%I #54 Jul 07 2021 08:36:39

%S 1,4,3,8,7,7,6,8,7,7,5,0,3,9,3,3,8,0,2,1,4,6,6,7,1,6,0,1,5,4,3,9,1,1,

%T 5,9,5,1,9,9,0,6,9,4,2,3,1,4,8,0,9,9,1,9,1,0,3,2,6,2,3,0,6,3,5,0,1,2,

%U 9,5,4,0,5,2,7,6,7,9,3,7,3,9,7,5,5,7,2

%N Decimal expansion of the second radiation constant c_2 in meter-kelvin.

%C Appears as a term in the Sakuma-Hattori equation for the electromagnetic signal from the thermal radiation emitted by an ideal black body of a given temperature.

%C It also appears in Planck's law when expressed in terms of the wavenumber. - _Charles R Greathouse IV_, Jun 25 2021

%C The exact value, following the 2019 redefinition of SI units, is 272115870842319/18913000000000000. Hence, periodic with period 18912. - _Charles R Greathouse IV_, Jun 25 2021

%C In natural (Planck) units this is 2*Pi = A019692. - _Charles R Greathouse IV_, Jul 07 2021

%H NIST, <a href="https://physics.nist.gov/cgi-bin/cuu/Value?c22ndrc">CODATA Value: second radiation constant</a>

%H Wikipedia, <a href="https://en.wikipedia.org/wiki/2019_redefinition_of_the_SI_base_units">2019 redefinition of the SI base units</a>

%H Wikipedia, <a href="https://en.wikipedia.org/wiki/Sakuma%E2%80%93Hattori_equation">Sakuma-Hattori equation</a>

%H <a href="/index/Rec#order_9457">Index entries for linear recurrences with constant coefficients</a>, order 9457.

%F c_2 = h*c/k where k is Planck's constant, c is the speed of light in a vacuum, and k is the Boltzmann constant. - _Charles R Greathouse IV_, Jun 25 2021

%e 0.014387768775039338021466716015439115951990694231480991910326230635012954... m K.

%o (PARI) period(r,base=10)=

%o {

%o my(d=denominator(r),f=factor(base)[,1]);

%o for(i=1,#f,

%o d /= f[i]^valuation(d,f[i])

%o );

%o znorder(Mod(base,d));

%o }

%o rationalNumberOrder(r,base=10)=

%o {

%o my(f=factor(base)[,1],t,L,x='x,P);

%o for(i=1,#f,

%o t=valuation(r,f[i]);

%o if(t<0, r*=f[i]^-t)

%o );

%o r = frac(r);

%o L = period(r, base);

%o P = Polrev(digits(r*(base^L-1)));

%o poldegree(denominator(P/(1-x^L)));

%o }

%o rationalNumberOrder(272115870842319/18913000000000000) \\ _Kevin Ryde_ and _Charles R Greathouse IV_, Jul 05 2021

%Y Cf. A003678, A070063, A003676.

%K nonn,cons,easy

%O -1,2

%A _Felix Fröhlich_, Apr 12 2018

%E More terms from _Charles R Greathouse IV_, Jun 25 2021

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 April 19 21:09 EDT 2024. Contains 371798 sequences. (Running on oeis4.)