# NOT RUN {
data(Pb)
il.pb<-construct.ilab(org=Pb$lab, x=Pb$value, measurand="Pb", item="none",
u=Pb$u, k=Pb$k, U=Pb$U, title=c("CCQM K30", "Lead in wine"), method=Pb$method)
print(il.pb)
plot(il.pb)
# }
Run the code above in your browser using DataLab