Thanks for the replying
However my data looks like this

when I use your method in R
qw<-matrix(March:April:May,nrow = 3,ncol = 51)
qw2<-matrix(March:April:May,nrow = 153,ncol=1)
qw2
qw2[1:153]<-qw
qw2
it return this
[,1]
[1,] 8568065
[2,] 8568066
[3,] 8568067
[4,] 8568068
[5,] 8568069
[6,] 8568070
[7,] 8568071
....
thanks