Code issue Lecture 4

[blowfish3000]

Hi,
thanks for making all this material available, I learn quite a bit through your lectures!

I have an issue with code from lecture 4, more specifically this line:
height.dat<-data.frame(code=rownames(seedplantsdata),height=as.numeric(seedplantsdata$height))
which throws this warning message:
In data.frame(code = rownames(seedplantsdata), height = as.numeric(seedplantsdata$height)) : NAs introduced by coercion
which makes sense since height is factor (small, medium, large) and can't be cast as numeric (or?)
Is there an error in the script or am I making a stupid mistake somewhere?

Thanks again!

[tm3538a]

I think the issue is the fact that height variable was created as a factor variable of its own outside of seedplantsdata. So when the highlighted code calls for height data from seedsplandata, it will generate NAs because heigh is not a factor variable there. The following code below should work:

height.dat<-data.frame(code=rownames(seedplantsdata),height=as.numeric(height))