这个屌丝很懒，什么也没留下！

R语言|做点儿好玩儿的东西_r语言有趣的代码

作者：IT小白 | 2024-03-12 03:50:56

电影《少年班》中两次出现过这样一道题：

在电影的最后，出现了这道题的解答，是一条心形线。

我觉得还挺有意思的，就试着用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(x,y))
  y=(x^2)^(1/3)-(1-x^2)^(1/2)
  heart<-rbind(heart,c(x,y))
}

本文内容由网友自发贡献，转载请注明出处：【wpsshop博客】