# Create some data of class 'Data'
myData <- Data(x=c(0.1,0.5,1.5,3,6,10,10,10),
y=c(0,0,0,0,0,0,1,0),
doseGrid=c(0.1,0.5,1.5,3,6,
seq(from=10,to=80,by=2)))
# Plot the data
plot(myData)
Run the code above in your browser using DataLab