PTT數位生活區 / Prob_Solve (計算數學 Problem Solving)

Re: [問題] mathematica畫圖-對數尺度問題

看板Prob_Solve (計算數學 Problem Solving)作者LPH66 (IWH68S0XZ8M89)時間16年前 (2008/04/01 13:07)推噓0(0推 0噓 0→)

留言0則, 0人參與討論串2/2 (看更多)

※ 引述《carter007r (大寶)》之銘言： : 下面是我mathematica的程式 : http://www.badongo.com/file/8556467 : 這是我的程式 : 我用一般的Plot可以畫 : 但我想改成對數尺度 : 也就是X軸以Log型式表示 : 但都會出現問題 : 有可以幫我解決的嗎 : 拜託了~~~謝謝通常Log尺度的型式要自行做改變假設你要畫的函式是f[x]好了你現在要把X軸用Log尺度來畫也就是 x=0的地方要畫f[1] x=1的地方要畫f[10] x=2的地方要畫f[100] etc. 那就改成這樣: Plot[f[10^x],{x,2,5},(*其他選項*)] (我把上限改成100000比較好寫範圍如果還是要50000就改成4+Log[10,5]) 或是以你的寫法會變成 Plot[Evaluate[magnitude/.f->10^x],{x,2,5},(*其他選項*)] 至於標號問題加上Ticks選項: Ticks->{{{2,100},{3,1000},{4,10000},{5,100000}},Automatic} 這樣會標出100,1000,10000,100000等位置要標小一點的位置就這樣: Ticks->{{{2,100},{2+Log[10,2],""},{2+Log[10,3],""},(*中略*),{2+Log[10,9],""}, {3,1000},(*中略*),{5,100000}},Automatic} 在對應於200,300,400,...,900等的位置標tick但不顯示label -- ◢ ˊ_▂▃▄▂_ˋ. ◣　　　　　　　　　▅▅　▅▅　ι●╮　　 █▄▄▄▄▄ ▍./◤_▂▃▄▂_◥ \'▊ 　　ＨＡＲＵＨＩ █████　＜■┘ 　 ▄▄▄▄▄▄▄ ▎⊿ ◤◤◥█◥◥█Δ 　　ＩＳＭ　　　By-gamejye　￠|\ 　　▌▌▌▌▌▄▌▌ ▏ζ(▏●‵◥′●▊)Ψ ▏　　　　　　　　　█　　　 ⊿Δ 　　▄▄▄ ▄▄▄▄ █/|▊ 〃、〃▋ |\ ▎　　　　　　　ハルヒ主義　　　　　█▄▄▄█▄▄ ◥◥|◣ ‵′ ◢/'◢◢S.O.S 世界を大いに盛り上げるための涼宮ハルヒの団　　　 -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 140.112.30.84