Displaying 1 result from an estimated 1 matches for "add0661".
Did you mean:
acd06610
2012 Jun 12
3
Mapping one vector to another
...ap[1:3,]
node island
1 ABY0111 SI
2 ABY1101 SI
3 ADD0111 SI
and:
> periods[1:3, c("Date", "Period", "Bus", "Price")]
Date Period Bus Price
1 2004-01-01 1 ABY0111 31.20
2 2004-01-01 1 ADD0111 32.43
3 2004-01-01 1 ADD0661 32.38
This seems to work (it fooled me for quite a while :-) ), but the following check:
for (b in periods$Bus)
{
if (periods[periods$Bus == b, "Island"] != map[b])
{
print(b)
print(periods[periods$Bus == b, "Island"][1:1])
print(map[b])
}
}
prints...