Subject | : Re^4: Tracking particle's Matching |
Article No | : 508 |
Date | : 2008/01/08(Tue) 19:01:36 |
Contributor | : AKio Morita |
> > > (AZ->.226810350638561) > > という値が返ってきますが,これを数値表現(?)に直せますか? > > ちなみに,一つの方法として, > ax=Part[Cases[Part[(ExtendedTwissParameters/.Emittance[Matrix->True]),1],_Real],1]; > bx=Part[Cases[Part[(ExtendedTwissParameters/.Emittance[Matrix->True]),2],_Real],1]; > ay=Part[Cases[Part[(ExtendedTwissParameters/.Emittance[Matrix->True]),4],_Real],1]; > by=Part[Cases[Part[(ExtendedTwissParameters/.Emittance[Matrix->True]),5],_Real],1]; > az=Part[Cases[Part[(ExtendedTwissParameters/.Emittance[Matrix->True]),7],_Real],1]; > bz=Part[Cases[Part[(ExtendedTwissParameters/.Emittance[Matrix->True]),8],_Real],1]; > とすることで, > Emittance[]関数からTwissパラメータを取り出せました. > (あんまりスマートなやり方ではないと思いますが・・・.) > {AX,BX,AY,BY,AZ,BZ}/.(ExtendedTwissParameters/.Emittance[Matrix->True])
|