[問題] 寫計算台鐵票價函數跑不出結果

[bboybighead2 (腳毛會唱歌)]

[問題類型]:
程式諮詢(我想用R 做某件事情，但是我不知道要怎麼用R 寫出來)

[使用R的經驗]
入門(寫過其他程式，只是對語法不熟悉)

[問題敘述]:

寫了計算台鐵票價小程式，但卻跑不出結果。
建立完函數後，依下列方式使用卻跑不出結果。
--------------------------------------
output

> Price(from="基隆",to="高雄",yoyo=T)
numeric(0)
--------------------------------------
若但若不使用函數，自己一行一行跑，是可以執行出結果的。
希望版友能幫忙指出盲點為何，/(_ _)\

[程式範例]:
程式碼在此：https://ideone.com/baBmUR

[環境敘述]:

R version 3.2.4 Revised (2016-03-16 r70336)
Platform: x86_64-w64-mingw32/x64 (64-bit)
Running under: Windows >= 8 x64 (build 9200)


--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 1.174.85.84
※ 文章網址: https://www.ptt.cc/bbs/R_Language/M.1508497233.A.917.html
→ cccc12345:  x<-regexpr("from",TICKET[,1])你的from變成字串from
推 a181w: 問個問題 如果兩站距離沒有大於70km 那個z是不是會算錯？
→ Paravion: function裡面的from和to不用加引號