I'm trying to reshape a data frame so that each unique value in a column becomes a binary column.

I've been provided data that looks like this:

```
df <- data.frame(id = c(1,1,2),
                 value = c(200,200,1000),
                 feature = c("A","B","C"))

print(df)

##id,value,feature
##1,200,A
##1,200,B
##2,1000,C

```

I'm trying to reshape it into this:

```
##trying to get here
##id,value,A,B,C
##1,200,1,1,0
##2,1000,0,0,1

```

`spread(df,id,feature)` fails because ids repeat.

I want to reshape the data to facilitate modeling - I'm trying to predict value from the presence or absence of features.