2011年5月31日 星期二

[自動轉寄] Re: [其他] mathematica 繪圖

作者: sparrow620 (可遇不可求′-`y-∼)
標題: Re: [其他] mathematica 繪圖
時間: Wed Jun 1 00:07:39 2011

嗯嗯

再次感謝~ Orz


※ 引述《chungyuandye (養花種魚數月亮賞星星)》之銘言:
: ※ 引述《sparrow620 (可遇不可求′-`y-∼)》之銘言:
: : 再請問一下
: : 這個不等式繪圖,RegionPlot指令
: : 可以只顯示數線,而不上色嗎?
: Manipulate[
: RegionPlot[{x >= xx, x - y >= 225/16, y >= yy}, {x, -100,
: 100}, {y, -100, 100}, PlotRange -> All,
: PlotStyle -> None], {{xx, 975/16}, -100, 100}, {{yy, 75/16}, -100,
: 100}]
: 有問題可以到我blog討論∼

--
保存期限 過了嗎?
過期...就會有瑕疵了...

--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 118.171.81.215

[自動轉寄] (sparrow620) Re: [其他] mathematica 繪圖

作者: chungyuandye (養花種魚數月亮賞星星)
標題: Re: [其他] mathematica 繪圖
時間: Tue May 31 21:39:07 2011

※ 引述《sparrow620 (可遇不可求′-`y-∼)》之銘言:
: 再請問一下
: 這個不等式繪圖,RegionPlot指令
: 可以只顯示數線,而不上色嗎?
: ※ 引述《chungyuandye (養花種魚數月亮賞星星)》之銘言:
: : Manipulate[
: : Show[
: : RegionPlot[{x>=xx,x-y>=225/16,y>=yy},
: : {x,-100,100},{y,-100,100},PlotRange->All],
: : RegionPlot[x>=xx&&x-y>=225/16&&y>=yy,
: : {x,-100,100},{y,-100,100},PlotStyle->Blue]],
: : {{xx,975/16},-100,100},{{yy,75/16},-100,100}
: : ]

Manipulate[
RegionPlot[{x >= xx, x - y >= 225/16, y >= yy}, {x, -100,
100}, {y, -100, 100}, PlotRange -> All,
PlotStyle -> None], {{xx, 975/16}, -100, 100}, {{yy, 75/16}, -100,
100}]

有問題可以到我blog討論∼

--
我打研究室走過 那獨坐電腦前的容顏如苦瓜的糾結
靈感不來 長壽的煙霧不散
研究室如小小的寂寞的城 恰如商管的電梯向晚

http://chungyuandye.twbbs.org

--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 218.173.129.195

2011年5月30日 星期一

[自動轉寄] Re: [其他] mathematica 繪圖

作者: sparrow620 (可遇不可求′-`y-∼)
標題: Re: [其他] mathematica 繪圖
時間: Tue May 31 09:22:26 2011

修改了一下 似乎得到我想要的圖
感謝~

※ 引述《chungyuandye (養花種魚數月亮賞星星)》之銘言:
: ※ 引述《sparrow620 (可遇不可求′-`y-∼)》之銘言:
: : 請問這個指令是不是沒辦法 為x-y軸命名
: : 以及將座標刻度取消?
: : 試了 AxesLabel 跟 Ticks 好像不行…
: : 因為其實我想畫的圖 數字部份(如975/16)我是用 給定(a,c,epsilon_1,epsilon_2)四個
: : 才有一個確切值(如975/16)
: : 不然應該只是
: : x>= 某常數
: : x-y>= 某某常數
: : y>= 某某某常數
: : 其中x>=0,y>=0 可變動的部份是(a,c,epsilon_1,epsilon_2)才會有對應的x-y圖
: : 沒辦法不顯示刻度的話,圖似乎要再另外手畫的樣子...
: Manipulate[Show[
: RegionPlot[{x >= xx, x - y >= 225/16, y >= yy}, {x, -100,
: 100}, {y, -100, 100}, PlotRange -> All],
: RegionPlot[
: x >= xx && x - y >= 225/16 && y >= yy, {x, -100, 100}, {y, -100,
: 100}, PlotStyle -> Blue],
: Axes -> True, AxesLabel -> {"x", "y"}, Frame -> False,
: Ticks -> {Range[-100, 100, 25], Range[-100, 100, 25]}
: ], {{xx, 975/16}, -100, 100}, {{yy, 75/16}, -100, 100}]

--
保存期限 過了嗎?
過期...就會有瑕疵了...

--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 114.47.208.16

[自動轉寄] (sparrow620) Re: [其他] mathematica 繪圖

作者: chungyuandye (養花種魚數月亮賞星星)
標題: Re: [其他] mathematica 繪圖
時間: Tue May 31 05:17:50 2011

※ 引述《sparrow620 (可遇不可求′-`y-∼)》之銘言:
: 請問這個指令是不是沒辦法 為x-y軸命名
: 以及將座標刻度取消?
: 試了 AxesLabel 跟 Ticks 好像不行…
: 因為其實我想畫的圖 數字部份(如975/16)我是用 給定(a,c,epsilon_1,epsilon_2)四個
: 才有一個確切值(如975/16)
: 不然應該只是
: x>= 某常數
: x-y>= 某某常數
: y>= 某某某常數
: 其中x>=0,y>=0 可變動的部份是(a,c,epsilon_1,epsilon_2)才會有對應的x-y圖
: 沒辦法不顯示刻度的話,圖似乎要再另外手畫的樣子...
: ※ 引述《chungyuandye (養花種魚數月亮賞星星)》之銘言:
: : Manipulate[
: : Show[
: : RegionPlot[{x>=xx,x-y>=225/16,y>=yy},
: : {x,-100,100},{y,-100,100},PlotRange->All],
: : RegionPlot[x>=xx&&x-y>=225/16&&y>=yy,
: : {x,-100,100},{y,-100,100},PlotStyle->Blue]],
: : {{xx,975/16},-100,100},{{yy,75/16},-100,100}
: : ]

Manipulate[Show[
RegionPlot[{x >= xx, x - y >= 225/16, y >= yy}, {x, -100,
100}, {y, -100, 100}, PlotRange -> All],
RegionPlot[
x >= xx && x - y >= 225/16 && y >= yy, {x, -100, 100}, {y, -100,
100}, PlotStyle -> Blue],
Axes -> True, AxesLabel -> {"x", "y"}, Frame -> False,
Ticks -> {Range[-100, 100, 25], Range[-100, 100, 25]}
], {{xx, 975/16}, -100, 100}, {{yy, 75/16}, -100, 100}]

--
養花種魚數月亮賞星星

http://cydye1069.blogspot.com
http://tinyurl.com/25nedr2

--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 218.173.129.195

[自動轉寄] (sparrow620) Re: [其他] mathematica 繪圖

作者: chungyuandye (養花種魚數月亮賞星星)
標題: Re: [其他] mathematica 繪圖
時間: Tue May 31 05:16:57 2011

※ 引述《sparrow620 (可遇不可求′-`y-∼)》之銘言:
: 請問這個指令是不是沒辦法 為x-y軸命名
: 以及將座標刻度取消?
: 試了 AxesLabel 跟 Ticks 好像不行…
: 因為其實我想畫的圖 數字部份(如975/16)我是用 給定(a,c,epsilon_1,epsilon_2)四個
: 才有一個確切值(如975/16)
: 不然應該只是
: x>= 某常數
: x-y>= 某某常數
: y>= 某某某常數
: 其中x>=0,y>=0 可變動的部份是(a,c,epsilon_1,epsilon_2)才會有對應的x-y圖
: 沒辦法不顯示刻度的話,圖似乎要再另外手畫的樣子...
: ※ 引述《chungyuandye (養花種魚數月亮賞星星)》之銘言:
: : Manipulate[
: : Show[
: : RegionPlot[{x>=xx,x-y>=225/16,y>=yy},
: : {x,-100,100},{y,-100,100},PlotRange->All],
: : RegionPlot[x>=xx&&x-y>=225/16&&y>=yy,
: : {x,-100,100},{y,-100,100},PlotStyle->Blue]],
: : {{xx,975/16},-100,100},{{yy,75/16},-100,100}
: : ]

Manipulate[Show[
RegionPlot[{x >= xx, x - y >= 225/16, y >= yy}, {x, -100,
100}, {y, -100, 100}, PlotRange -> All],
RegionPlot[
x >= xx && x - y >= 225/16 && y >= yy, {x, -100, 100}, {y, -100,
100}, PlotStyle -> Blue],
Axes -> True, AxesLabel -> {"x", "y"}, Frame -> False,
Ticks -> {Range[-100, 100, 25], Range[-100, 100, 25]}
], {{xx, 975/16}, -100, 100}, {{yy, 75/16}, -100, 100}]


--
養花種魚數月亮賞星星

http://cydye1069.blogspot.com
http://tinyurl.com/25nedr2

--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 218.173.129.195

[自動轉寄] Re: [其他] mathematica 繪圖

作者: sparrow620 (可遇不可求′-`y-∼)
標題: Re: [其他] mathematica 繪圖
時間: Tue May 31 02:13:00 2011

請問這個指令是不是沒辦法 為x-y軸命名
以及將座標刻度取消?
試了 AxesLabel 跟 Ticks 好像不行…
因為其實我想畫的圖 數字部份(如975/16)我是用 給定(a,c,epsilon_1,epsilon_2)四個
才有一個確切值(如975/16)
不然應該只是

x>= 某常數
x-y>= 某某常數
y>= 某某某常數
其中x>=0,y>=0 可變動的部份是(a,c,epsilon_1,epsilon_2)才會有對應的x-y圖
沒辦法不顯示刻度的話,圖似乎要再另外手畫的樣子...

※ 引述《chungyuandye (養花種魚數月亮賞星星)》之銘言:
: ※ 引述《sparrow620 (可遇不可求′-`y-∼)》之銘言:
: : 如果
: : x >= 975/16
: : x-y >= 225/16
: : y >= 375/16
: : 三條數線同時出現在二維x-y軸該怎麼畫@@"
: : 最近在摸這個軟體...
: : 它好像要給定範圍才能畫的樣子...
: Manipulate[
: Show[
: RegionPlot[{x>=xx,x-y>=225/16,y>=yy},
: {x,-100,100},{y,-100,100},PlotRange->All],
: RegionPlot[x>=xx&&x-y>=225/16&&y>=yy,
: {x,-100,100},{y,-100,100},PlotStyle->Blue]],
: {{xx,975/16},-100,100},{{yy,75/16},-100,100}
: ]

--
保存期限 過了嗎?
過期...就會有瑕疵了...

--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 114.47.208.16

2011年5月25日 星期三

[自動轉寄] [問題] 題項多 amos模式如何繪製

作者: aman0523 (Let's Start From Here) 看板: Statistics
標題: [問題] 題項多 amos模式如何繪製
時間: Thu May 26 02:46:08 2011

先感謝各位:)
我覺得我要問一個很笨的問題>"<

我的問卷共包含六個構念
共有64個題項
今天嘗試著看書跑SEM
使用AMOS軟體

可是我的題項實在好多
塞不下可繪製的版面
不知道大家有沒有遇過此種問題?

我想嘗試將構念下的題項先以因素分析分出子構念
再以子構念取代題項(即觀察變項)
不知道這方法可不可行
不然一個構念底下可能就多達15題
如果可行的話可以給我個提示要如何操作嘛?

真是麻煩各位幫忙解答了

--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 122.125.71.135
→ coldwind0912:雖然不是絕對 但sem一個構念超過6題適配也不會太好  05/26 07:42
→ coldwind0912:我記得有一篇著名的paper裡 有句經典的話....  05/26 07:43
→ coldwind0912:一個構念至少要3題 4題剛好 超過5題其餘的都是肉汁  05/26 07:44
→ coldwind0912:不然 就看原po要不要先作題項整合的動作了  05/26 07:45

[自動轉寄] SET 中獎咧! $ 900

恭喜您中了彩券
祝您發財

金額及看板寫在標題上


詳細結果將自動公佈到該看板

2011年5月24日 星期二

[自動轉寄] 老師您好!!又來向您請教了^^

作者: pxpypz (??)
標題: 老師您好!!又來向您請教了^^
時間: Tue May 24 17:44:14 2011


老師您好!!抱歉間隔兩個多月 又來打擾您了^^
感謝您前回指導我找出我的 model 中的正確解
(由那個解可以看出我的模型需要修改 所以這兩個月一直在修改中)

我目前正在解一個新的問題
等效於 兩條聯立方程式解兩個圓的交點
可能交於兩點 可能切於一點 也可能沒有交點

我的方程式在寄給您的附加檔案中
其中 A.B.R.V 都已知 求未知的 x,y 交點作標
我知道寫法很簡單 可是我的寫法卻跑不出來
是我的寫法錯了呢?
(解二元二次聯立方程式的方法是否和一般的一樣呢?
直覺上我覺得我弄錯了一個很簡單的地方 ><)

還是表示他沒有解呢?
還請您有空幫我看一下了!!
萬分感謝 !!^^

pxpypz 敬上

--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 42.72.127.120

2011年5月19日 星期四

[自動轉寄] Re: [請問] 基礎mathematica指令

作者: Liberl (利貝爾)
標題: Re: [請問] 基礎mathematica指令
時間: Fri May 20 00:07:54 2011

太感謝你了!!!

※ 引述《chungyuandye (養花種魚數月亮賞星星)》之銘言:
: ※ 引述《Liberl (利貝爾)》之銘言:
: : 如果我有一條式子
: : x=a/b+3*c 這樣
: : 然後我知道a b c分別多少
: : 我應該要如何打然後解出x?
: : 當然我可以直接代進去解
: : 不過因為那些都是參數 我希望微調後就可以直接重解
: : 我是想有沒有類似
: : x=a/b+3*c, a=2, b=5, c=7
: : 這樣的寫法
: : 感謝
: : 我查了洪維恩的書 似乎沒有寫?
: myfun[a_, b_ /; b != 0, c_] := a/b + 3 c
: In[100]:= myfun[2,-1,1]
: Out[100]= 1
: In[101]:= myfun[2,1,1]
: Out[101]= 5
: In[102]:= myfun[2,0,1]
: Out[102]= myfun[2,0,1]

--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 203.70.98.204

[自動轉寄] (Liberl) Re: [請問] 基礎mathematica指令

作者: chungyuandye (養花種魚數月亮賞星星)
標題: Re: [請問] 基礎mathematica指令
時間: Thu May 19 22:55:45 2011

※ 引述《Liberl (利貝爾)》之銘言:
: 如果我有一條式子
: x=a/b+3*c 這樣
: 然後我知道a b c分別多少
: 我應該要如何打然後解出x?
: 當然我可以直接代進去解
: 不過因為那些都是參數 我希望微調後就可以直接重解
: 我是想有沒有類似
: x=a/b+3*c, a=2, b=5, c=7
: 這樣的寫法
: 感謝
: 我查了洪維恩的書 似乎沒有寫?

myfun[a_, b_ /; b != 0, c_] := a/b + 3 c
In[100]:= myfun[2,-1,1]
Out[100]= 1
In[101]:= myfun[2,1,1]
Out[101]= 5
In[102]:= myfun[2,0,1]
Out[102]= myfun[2,0,1]

--
養花種魚數月亮賞星星

http://cydye1069.blogspot.com
http://tinyurl.com/25nedr2

--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 120.119.96.8

[自動轉寄] (lifeisdrama) Re: [其他] mathematica 解 ODE

作者: chungyuandye (養花種魚數月亮賞星星)
標題: Re: [其他] mathematica 解 ODE
時間: Thu May 19 22:38:42 2011

※ 引述《lifeisdrama (人生如戲)》之銘言:
: 請問各位板友
: 小弟我用mathematica解下列的式子
: 20y''(t)+3789y(t)=-10 Sign[y''(t)] ; y'(0)=0.1 , y(0)=0
: ~~~~~~~~~~~~
: 其中符號Sign(t)的定義為:
: 當t>0,則Sign(t)=1
: 當t<0,則Sign(t)=-1
: 程式碼如下
: NDSolve[{20 y''[t] + 3789 y[t] == -10 Sign[y''[t]], y[0] == 0,
: y'[0] == 0.1}, {y[t]}, {t, 0, 1}]
: 並且將圖形繪出,可得到下面的圖形
: Plot[Evaluate[y[t] /. %], {t, 0, 1}]
: http://www.pixavid.com/leSWO7/
: 由圖可知有兩條線,想請問為何會出現兩條線??
: 感謝你的回

因為
NDSolve[{20 y''[t] + 3789 y[t] == -10 Sign[y''[t]], y[0] == 0,
y'[0] == 0.1}, {y[t]}, {t, 0, 1}]
有兩組解阿

--
養花種魚數月亮賞星星

http://cydye1069.blogspot.com
http://tinyurl.com/25nedr2

--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 120.119.96.8