Statistics 板


LINE

[軟體程式類別]: R [程式問題]: 要如何讓使用者輸入數字 按下ENTER就能跑出結果來?? [軟體熟悉度]: 很不熟 只會些基礎中的基礎 [問題敘述]: 就老師最近出了二元樹作業 就要算選擇權價值還啥的 其他公式我自己摸索GOOGLE 應該是略知一二構想的的差不多 但是有個問題是 我只會用scan() > data <- scan() 1: 50 2: 52 3: 0.05 ....讓使用者自行輸入這些數據 然後我再用data[1]~data[n]...這些他們輸入的數字 套進我的公式去計算最後的價值 可是有個好笑的點就是使用者輸入完數據後 還要自行手動貼上我的程式碼 才會跑出最後那個價值.. 有沒有像c++之類的程式碼輸入好 然後run就讓你輸入數據 按個enter就跑出來結果的 不知道這樣形容有沒有人懂= =... 還煩請大大們給我個解答 不好意思這點小問題 打擾各位 [程式範例]: 範例我還沒完全做出來 就給我個啥函數用法可以滿足我需求即可 感謝各位 > data <- scan() 1: 810 2: 800 3: 0.05 4: 0.02 5: 0.2 6: 6 7: 2 8: 0 9: Read 8 items > dt <- data[6]/(12*data[7]) > u <- exp(data[5]*(dt^(1/2))) > d <- 1/u > a <- exp((data[3]-data[4])*dt) 我只PO出部分 最主要是Read 8 items下面這串都跟我scan()輸入的數據相依 如果放在scan()前面就會說沒有定義 等於我輸入完數據ENTER後 還要自己貼上下面這些程式碼在按ENTER才會跑出最後答案= = 大家的推文 我有想過function但我不太懂他的用法... 煩請大家有沒有其他更明確的程式碼幫我解之 整個程式碼架構我都打好了 就差這個小地方 感覺這樣就不是程式了 還要手動貼程式碼.......... ----------------------------------------------------------------------------- --



※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 111.249.183.151
1F:推 Puffle:寫function 01/03 01:46
2F:→ clickhere:help("source") 01/03 09:30
3F:→ gsuper:source("./my_script.txt") 01/03 13:19
4F:→ jbear79810:不好意思有更確切的嘛 我放上我大略的程式碼好了.. 01/03 13:31
※ 編輯: jbear79810 來自: 111.249.183.151 (01/03 13:37)
5F:→ jbear79810:如有更確切或更清楚的程式碼也可寄信給我 感謝大家 01/03 13:40
6F:→ andrew43:寫一個 function, 存成 .r 檔, 要用前用 source() 呼叫 01/03 13:58
7F:推 Puffle:help(function) 01/03 14:04
8F:→ jbear79810:感謝大家幫忙= =大概我資質愚鈍..我還是不太會... 01/03 15:52
9F:→ gsuper:你先寫一行指令 print("see_see"); , 存在一個txt檔案 01/03 16:13
10F:→ gsuper:假設檔案叫作SEE.txt,接著在R裡面輸入source("./SEE.txt") 01/03 16:15
11F:→ jbear79810:g大我試了 有跑出那串字 但是我想說因為要給老師的 01/03 16:25
12F:→ jbear79810:沒有那種一串程式碼我貼上去 就輸入數據ENTER就跑出來 01/03 16:25
13F:→ jbear79810:像C++一樣的? 所以還要傳給老師TXT檔讓他去RUN嘛 01/03 16:26
14F:→ jbear79810:因為對R有的功能不是很清楚 老師是說書面印出來就好 01/03 16:27
15F:→ jbear79810:可是我個人比較吹毛求疵 想說C++都會跳一個黑窗出來 01/03 16:27
16F:→ jbear79810:讓你輸入數據 然後ENTER幫你記算現值啦 等等之類的 01/03 16:27
17F:→ obarisk:還要加上gui? 01/03 22:53
18F:→ jbear79810:感謝各位熱情幫忙 我會了 感謝!!! 01/04 01:23
19F:推 lin15:分享一下? 01/04 07:59
20F:推 rockken:應該是類是library() 輸入source("檔案"),可以使用檔案內 01/04 13:57
21F:→ rockken:自己寫的程式 01/04 13:58







like.gif 您可能會有興趣的文章
icon.png[問題/行為] 貓晚上進房間會不會有憋尿問題
icon.pngRe: [閒聊] 選了錯誤的女孩成為魔法少女 XDDDDDDDDDD
icon.png[正妹] 瑞典 一張
icon.png[心得] EMS高領長版毛衣.墨小樓MC1002
icon.png[分享] 丹龍隔熱紙GE55+33+22
icon.png[問題] 清洗洗衣機
icon.png[尋物] 窗台下的空間
icon.png[閒聊] 双極の女神1 木魔爵
icon.png[售車] 新竹 1997 march 1297cc 白色 四門
icon.png[討論] 能從照片感受到攝影者心情嗎
icon.png[狂賀] 賀賀賀賀 賀!島村卯月!總選舉NO.1
icon.png[難過] 羨慕白皮膚的女生
icon.png閱讀文章
icon.png[黑特]
icon.png[問題] SBK S1安裝於安全帽位置
icon.png[分享] 舊woo100絕版開箱!!
icon.pngRe: [無言] 關於小包衛生紙
icon.png[開箱] E5-2683V3 RX480Strix 快睿C1 簡單測試
icon.png[心得] 蒼の海賊龍 地獄 執行者16PT
icon.png[售車] 1999年Virage iO 1.8EXi
icon.png[心得] 挑戰33 LV10 獅子座pt solo
icon.png[閒聊] 手把手教你不被桶之新手主購教學
icon.png[分享] Civic Type R 量產版官方照無預警流出
icon.png[售車] Golf 4 2.0 銀色 自排
icon.png[出售] Graco提籃汽座(有底座)2000元誠可議
icon.png[問題] 請問補牙材質掉了還能再補嗎?(台中半年內
icon.png[問題] 44th 單曲 生寫竟然都給重複的啊啊!
icon.png[心得] 華南紅卡/icash 核卡
icon.png[問題] 拔牙矯正這樣正常嗎
icon.png[贈送] 老莫高業 初業 102年版
icon.png[情報] 三大行動支付 本季掀戰火
icon.png[寶寶] 博客來Amos水蠟筆5/1特價五折
icon.pngRe: [心得] 新鮮人一些面試分享
icon.png[心得] 蒼の海賊龍 地獄 麒麟25PT
icon.pngRe: [閒聊] (君の名は。雷慎入) 君名二創漫畫翻譯
icon.pngRe: [閒聊] OGN中場影片:失蹤人口局 (英文字幕)
icon.png[問題] 台灣大哥大4G訊號差
icon.png[出售] [全國]全新千尋侘草LED燈, 水草

請輸入看板名稱,例如:iOS站內搜尋

TOP