time data 
    1 67
    2 39

    2000 45

time.csvというデータが有りますが(下参照)、2つ実現できないことがあって困っています。
1,R上で1~1500まで切り取って新しいデータセットを作る。
2,すでに推定の終わっているモデルを用いてdataの隣にpredictのデータを並べる。
(例) predict=3+time*1.4

一応いろいろ試してはいますがうまく行きません。
下のコードだとエラーが出てしまいます。

    data <-read.csv("time.csv",header=TRUE)
    pre<-data.frame(time=1:1500,data=data,predict=3+time*1.4)

EXCELだと簡単ですがRだとパッケージ分析ばかりやっていてクリーニングはEXCELにやらせていましたが、データが大きくなったり複雑になるとRのほうが楽だと思い今回質問させていただきました。RstudioやパッケージでSQLを使うという手もあるかと思いましたがRを用いる方向でお願い致します。