R语言|作点儿好玩儿的东西

     电影《少年班》中两次出现过这样一道题：      在电影的最后，出现了这道题的解答，是一条心形线。      我以为还挺有意思的，就试着用R语言作了一下。代码以下。      heart<-data.frame() for(i in 1:4000) { x=i*0.0005-1 y=(x^2)^(1/3)+(1-x^2)^(1/2) heart<-rbind(heart,c(

>>阅读原文<<