ʪÍý¤ËÌá¤ë¡¡¡¡¡¡ÇÈÆ°ÊýÄø¼°[1-3]¡¡by Mathematica µì¥Ð¡¼¥¸¥ç¥ó
ÇÈÆ°ÊýÄø¼°¤Î°ìÈ̼°¤Ï
y=A Sin[2 π ¤Çɽ¤µ¤ì¤¿¡£
¤³¤Î¥°¥é¥Õ¤òºî¤ê¡¢¤µ¤é¤Ë»þ´ÖÊѲ½¤µ¤»Mathematica¤Î¥¢¥Ë¥á¡¼¥·¥ç¥óµ¡Ç½¤òÍøÍѤ·¤Æ¤ß¤è¤¦¡£
[ÊýÄø¼°¤òÄêµÁ¤¹¤ë]
ÇÈÆ°ÊýÄø¼°¤Ï¿¶ÉýA¤È¼þ´üT¡¢ÇÈĹ λ ¤È½é´ü°ÌÁêφ¤¬·è¤Þ¤ì¤Ð·èÄꤵ¤ì¤ë¡£¤½¤³¤Ç¼¡¤Î¤è¤¦¤Ë¡§¡á¤ò»È¤Ã¤Æ¼°¤òÄêµÁ¤·¤Æ¤·¤Þ¤¨¤Ð²¿ÅÙ¤â»È¤¦»þ¤ËÊØÍø¤À¡£
¡²¤ò¼¡¤Î¤è¤¦¤Ë»È¤Ã¤ÆÄêµÁ¤¹¤ë¤È
![[Graphics:Images/WaveFuc_gr_2.gif]](Images/WaveFuc_gr_2.gif)
½é´ü°ÌÁêπ¤¬¥Þ¥¤¥Ê¥¹¤ÎÉ乿¤ËÊѤï¤Ã¤Æ¤¤¤ë¤Î¤¬¤ï¤«¤ë¤Í¡£¤Ç¤ÏÇÈÆ°ÊýÄø¼°¤ò¼¡¸µ¤Î¥°¥é¥Õ¤ÇÉÁ¤«¤»¤è¤¦¡£
[3Ý쎳¥°¥é¥Õ¤òÉÁ¤¯(¤½¤Î£±)]
3Ý쎳¥°¥é¥Õ¤òÉÁ¤¯£±¤Ä¤¬Plot3D¥³¥Þ¥ó¥É¤À¤³¤Î¥°¥é¥Õ¤Ï
Plot[y(t,x),{t,t¤Î¤Ï¤¸¤á¤ÎÃÍ,t¤Î½ª¤ï¤ê¤ÎÃÍ}{x,x¤Î¤Ï¤¸¤á¤ÎÃÍ,x¤Î½ª¤ï¤ê¤ÎÃÍ}]
¤È¤·¤Æ»È¤¦¡£¤³¤ì¤Ç£úÊý¸þ¤Ë£ù¡¢xÊý¸þ¤Ë£ø¡¢£ùÊý¸þ¤Ë£ô¤¬É½Ž¦¤Ç¤¤ë¡£
![[Graphics:Images/WaveFuc_gr_4.gif]](Images/WaveFuc_gr_4.gif)
![[Graphics:Images/WaveFuc_gr_7.gif]](Images/WaveFuc_gr_7.gif)
[¥¢¥Ë¥á¡¼¥·¥ç¥ó]
Mathematica¤Î²èÌ̱¦¤Ë¤Ï¡¡]¡¡¤¬¤¤¤¯¤Ä¤«Ê¤ó¤Ç¤¤¤ë¤³¤ì¤ò¥¯¥ê¥Ã¥¯(Ê£¿ôÁªÂò¤¹¤ë¾ì¹ç¤Ï¥É¥é¥Ã¥°)¤¹¤ë¤È
¤½¤Î¡¡]¡¡(¥»¥ë¤È¤¤¤¦)¡¡Æâ¤ÎÆâÍÆ¤ò¥³¥Ô¡¼¤·¤¿¤ê¡¢½ñŽ®¤òÊѤ¨¤¿¤ê¡¢ºï½ü¤·¤¿¤ê¤Ç¤¤ë¡£
¤½¤³¤Ç¡¡¥¢¥Ë¥á¡¼¥·¥ç¥ó(Ï¢Â³É½Ž¦¤·¤¿¤¤Éôʬ)¤òÁªÂò¤·¡¢¥á¥Ë¥å¡¼¥Ð¡¼¤Î¥»¥ë¤ò¥¯¥ê¥Ã¥¯¤½¤ÎÃæ¤Î¥¢¥Ë¥á¡¼¥·¥ç¥ó
¤ò¥¯¥ê¥Ã¥¯¤¹¤ë¤È¿Þ¤¬Ï¢Â³É½Ž¦¤µ¤ìư¤¤¤Æ¤¤¤ë¤è¤¦¤Ë¸«¤¨¤ë¡£
![[Graphics:Images/WaveFuc_gr_14.gif]](Images/WaveFuc_gr_14.gif)
![[Graphics:Images/WaveFuc_gr_15.gif]](Images/WaveFuc_gr_15.gif)
![[Graphics:Images/WaveFuc_gr_18.gif]](Images/WaveFuc_gr_18.gif)