I think you have it the wrong way around, you want
sb$CAR_Density[sb$CAR_Density == "001: 0-3.8998943958"] <- 1.9499
If you tell us a bit more about your data, we can show an automated way of replacing each unique value with a median - but i am lost as to how the densities convert into medians given your example.