[R] survey weights

[A Das]

Hi all, I've been trying to get a large (12mb) Stata
survey database into R. I managed that, but when I
attach survey weights, something goes wrong. The error
message is: object dchina not found. Here's the
script:

library(car)
library(foreign)
library(survey)

China <- read.dta("C:/final07c2.dta")
attach(China)

data(China)
dchina<-svydesign(id=~psu,strata=~strata,weights=~weight0x,data=China,nest=TRUE)
summary(dchina)

Any thoughts?
       -Bobby