convert table

I have a table like this:

coor   v1   v2   v3
x1   12   33   123 
x2   1   123
x3   12 
x4   33   1

and I'd like to tranform this matrix in presence/absence data.frame

coor   1   12   33   123
x1   0   1   1   1 
x2   1   0   0   1
x3   0   1   0   0 
x4   1   0   1   0
    

#This uses the reshape package
df = data.frame(coor = paste("x", 1:4, sep=""), v1=c(12,1,12,33), 
v2=c(33,123,NA,1), v3=c(1,NA,NA,NA))
mdf = melt(df)
with(mdf, table(coor, value))
  

df = data.frame(coor = paste("x", 1:4, sep=""), v1=c(12,1,12,33),

mdf <- reshape(df, direction="long", varying=c("v1","v2","v3"), sep="")
with(mdf, table(coor, v))