Filling in Gapped Interval of a Data Frame As Series

Dear all,

I have a data frame that looks like this:
dat
V1     V2
1  -8      100
2  -6      20.2
3  -1      1.5
4   2      3.00
5   3      78.8
6   5      33.2
7   6      44.5
8   7     5.00

Now I want to fill the V1 column  in series (note that it is gapped),
with the corresponding value in V2 as 0.

So in the end we would like to have:
newdat
V1     V2
1   -8      100
2   -6      20.2
3   -7      0
4   -6      0
5   -5      0
6    -4     0
7    -3     0
8    -2     0
9    -1     1.5
10    0     0
11    1     0
12   2      3.00
13   3      78.8
14   4      0
15   5      33.2
16   6      44.5
17   7      5.00

Is there a way to do it in R?
- Gundala Viswanath
Jakarta - Indonesia
one way is the following:

dat. <- data.frame(V1 = min(dat$V1):max(dat$V1), V2 = 0)
newdat <- merge(dat, dat., by = "V1", all.y = TRUE, suffixes = c("", "."))
newdat$V2[na.ind] <- newdat$V2.[na.ind <- is.na(newdat$V2)]
newdat[-3]

I hope it helps.

Best,
Dimitris
Dear all,

I have a data frame that looks like this:

dat
    V1     V2
1  -8      100
2  -6      20.2
3  -1      1.5
4   2      3.00
5   3      78.8
6   5      33.2
7   6      44.5
8   7     5.00

Now I want to fill the V1 column  in series (note that it is gapped),
with the corresponding value in V2 as 0.

So in the end we would like to have:

newdat
    V1     V2
1   -8      100
2   -6      20.2
3   -7      0
4   -6      0
5   -5      0
6    -4     0
7    -3     0
8    -2     0
9    -1     1.5
10    0     0
11    1     0
12   2      3.00
13   3      78.8
14   4      0
15   5      33.2
16   6      44.5
17   7      5.00

Is there a way to do it in R?
- Gundala Viswanath
Jakarta - Indonesia

______________________________________________
R-help at 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.

Dimitris Rizopoulos
Assistant Professor
Department of Biostatistics
Erasmus University Medical Center

Address: PO Box 2040, 3000 CA Rotterdam, the Netherlands
Tel: +31/(0)10/7043478
Fax: +31/(0)10/7043014
Try this:
library(zoo)
Lines <- "-8      100
+   -6      20.2
+   -1      1.5
+    2      3.00
+    3      78.8
+    5      33.2
+    6      44.5
+    7     5.00"
DF <- read.table(textConnection(Lines))
z <- zoo(DF$V2, DF$V1)
zz <- merge(z, zoo(, seq(min(time(z)), max(time(z)))), fill = 0); zz
-8    -7    -6    -5    -4    -3    -2    -1     0     1     2     3     4
100.0   0.0  20.2   0.0   0.0   0.0   0.0   1.5   0.0   0.0   3.0  78.8   0.0
    5     6     7
 33.2  44.5   5.0

If you want to create a data frame from that try this:

newDF <- data.frame(Time = time(zz), Value = coredata(zz))

although you might be best off to just leave it as a zoo object
so that you can make use of other zoo methods too.
plot(zz, type = "o")
See the three zoo vignettes (PDF documents) for more info.
Dear all,

I have a data frame that looks like this:

dat
? ?V1 ? ? V2
1 ?-8 ? ? ?100
2 ?-6 ? ? ?20.2
3 ?-1 ? ? ?1.5
4 ? 2 ? ? ?3.00
5 ? 3 ? ? ?78.8
6 ? 5 ? ? ?33.2
7 ? 6 ? ? ?44.5
8 ? 7 ? ? 5.00

Now I want to fill the V1 column ?in series (note that it is gapped),
with the corresponding value in V2 as 0.

So in the end we would like to have:

newdat
? ?V1 ? ? V2
1 ? -8 ? ? ?100
2 ? -6 ? ? ?20.2
3 ? -7 ? ? ?0
4 ? -6 ? ? ?0
5 ? -5 ? ? ?0
6 ? ?-4 ? ? 0
7 ? ?-3 ? ? 0
8 ? ?-2 ? ? 0
9 ? ?-1 ? ? 1.5
10 ? ?0 ? ? 0
11 ? ?1 ? ? 0
12 ? 2 ? ? ?3.00
13 ? 3 ? ? ?78.8
14 ? 4 ? ? ?0
15 ? 5 ? ? ?33.2
16 ? 6 ? ? ?44.5
17 ? 7 ? ? ?5.00

Is there a way to do it in R?
- Gundala Viswanath
Jakarta - Indonesia

______________________________________________
R-help at 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.