How can I use replicate weights to create standard errors in R?

I tried to follow exactly the steps explained above, but always get this error:

Error in if (combined.weights & probably.not.combined.weights) warning(paste(“Data do not look like combined weights: mean replication weight is”, :
missing value where TRUE/FALSE needed

does anybody have an idea what’s wrong ?

Many thanks in advance !