[quote]种子雨
1977年3月13日,英国布里斯托尔城下了一场榛子雨。使人疑惑不解的是,榛子的收获季节是在9~10月份,而且该城没有一棵榛子树,这新鲜香甜的榛子是从哪里来的呢?据目击者身齐布林先生和夫人说:"那天天空晴朗,万里无云。起初,我们还以为哪位调皮的小孩从大楼顶上向下扔榛子,后来才看清那榛子确实是从天上掉下来的"。据说,1967年,英国都柏林城也下过一场榛子雨。那次榛子倾盆而下,力量很大,犹如子弹射出枪膛,街上正巡逻的警察,虽然头戴钢盔,也被榛子打得晕头晕脑,于是只好抱头在街上乱窜,寻找躲避的地方。
http://www.sdbjedu.com/kxkx/zt/cqxx/web/qxcw/yu3.htm
[/quote]
你这个图用abline()添加直线就够了。举例:
f=function(x0,y0,b){
plot(x0,y0,xlim=c(x0-10,x0+10),ylim=c(y0-10,y0+10),type='n')
#y-y0=b(x-x0)
for(i in b)abline(y0-i*x0,i)
points(x0,y0)
}
f(2,3,seq(-1,1,.05))