作者jbear79810 (阿纬)
看板Statistics
标题[程式] R程式一个小问题
时间Tue Jan 3 01:27:53 2012
[软体程式类别]: 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