Rのdplyrでleft joinについて 急ぎでお願いいたします。

Question

###前提・実現したいこと
3つのベクトルをつなげて、転置しデータフレームに変換し別のデータフレームとdplyrによってleft joinしたいと思っています。
まず、以下のようなベクトルがあります。
2901、2902、…、2959
3000、3001、…、3059
3100、3101、…、3159
これを
c <- rep(2901:2959),
ｄ <- rep(3000:3059),
e <- rep(3100:3159)
のように作成しました。
そして、
A) g <- as.data.frame(tm = c(rep(2901:2959),rep(3000:3059),rep(3100:3159)))
ここまでのイメージは,
tm
2901
2902
・
2959
3000
3001
・
3059
3100
・
3159
となってほしいことです。
これと、別のデータフレーム（以下p）に、tmをキーとしてdplyrでleft joinしようと思っています。
B) dplyr::left_join(g, p,by="tm")
pのtmには、いくつかデータが欠けていて、連番にはなっていません。
どなたか解決方法がわかる方よろしくお願いいたします。

###発生している問題・エラーメッセージ
A)を実行すると、以下のようなエラーメッセージがでました。
as.data.frame(tm = c(rep(2901:2959), rep(3000:3059), でエラー:
引数 "x" がありませんし、省略時既定値もありません

###該当のソースコード
g <- as.data.frame(tm = c(rep(2901:2959),rep(3000:3059),rep(3100:3159)))
dplyr::left_join(g, p,by="tm")

###試したこと
head(c,n=5)と実行してみましたが、
[,1]
[1,] 222901
となっており、列として並んでいないようです。

###補足情報(言語/FW/ツール等のバージョンなど)
R i386 3.3.2
Win10

Answer 1

データフレーム作成の時点で失敗しておられるようです。

g<-data.frame(tm = c(rep(2901:2959),rep(3000:3059),rep(3100:3159)))

としてはいかがですか？