当前位置:天才代写 > tutorial > 其他教程 > R语言:抓交通闯祸犯

R语言:抓交通闯祸犯

2017-12-04 08:00 星期一 所属: 其他教程 浏览:473

一辆卡车违反交通法则,撞人后逃跑。现场有三人眼见事件,但都没有记着车号,只记下车号的一些特征。甲说:牌照的前两位数字是沟通的;乙说:牌照的后两位数字是沟通的,但与前两位差异; 丙是数学家,他说:四位的车号恰好是一个整数的平方。请按照以上线索求出车号。


x=1:9


y=0:9


foo = function(x,y) if(x!=y) x*1000+x*100+y*10+y


k=outer(x,y,foo)


g=sqrt(k)k[which(k%%g==0)]


[1] 7744

 

    关键字:

天才代写-代写联系方式