Hi Veepsirtt,
May be this helps:

dat1 <- structure(list(V2 = c(11109.75, 11135.15, 11105.85, 11099.75, 
11055.55, 11063.45, 11045.65, 11065, 11061.2, 11070.25, 11069.3, 
11076, 11081.85, 11086.4, 11086.7, 11065.6, 11071.25, 11073.15, 
11077.8, 11067.7, 11061.1, 11065.9, 11069.1, 11063.3, 11070.45, 
11074.4, 11069.4, 11063.65, 11067.05, 11070.1, 11074, 11069.6, 
11072.65, 11073.7, 11061.35, 11064.2, 11066.85, 11078.15, 11079.65, 
11079.5, 11075.9, 11066.95, 11072.55, 11068.85, 11073.5, 11067.6, 
11055.3, 11053.3, 11052.65, 11047.6, 11045.25, 11028.9, 11036.15, 
11034.3, 11044.05, 11030.65, 11036.6, 11039.75, 11035.35, 11019.05
)), .Names = "V2", class = "data.frame", row.names = c(NA, 60L
))
dat1[seq(5,nrow(dat1),by=5),,drop=FALSE]
#or
dat1[((seq(nrow(dat1))-1)%%5+1)==5,,drop=FALSE]

A.K.




On Sunday, January 19, 2014 9:40 AM, "veepsi...@gmail.com" 
<veepsi...@gmail.com> wrote:

Hi A.K sir

1,11109.75
2,11135.15
3,11105.85
4,11099.75
5,11055.55
6,11063.45
7,11045.65
8,11065
9,11061.2
10,11070.25
11,11069.3
12,11076
13,11081.85
14,11086.4
15,11086.7
16,11065.6
17,11071.25
18,11073.15
19,11077.8
20,11067.7
21,11061.1
22,11065.9
23,11069.1
24,11063.3
25,11070.45
26,11074.4
27,11069.4
28,11063.65
29,11067.05
30,11070.1
31,11074
32,11069.6
33,11072.65
34,11073.7
35,11061.35
36,11064.2
37,11066.85
38,11078.15
39,11079.65
40,11079.5
41,11075.9
42,11066.95
43,11072.55
44,11068.85
45,11073.5
46,11067.6
47,11055.3
48,11053.3
49,11052.65
50,11047.6
51,11045.25
52,11028.9
53,11036.15
54,11034.3
55,11044.05
56,11030.65
57,11036.6
58,11039.75
59,11035.35
60,11019.05
thanks
veepsirtt


_____________________________________
Sent from http://r.789695.n4.nabble.com

______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.

Reply via email to