+-在R的平方根之前

用户名

我正在尝试在R中编写一个方程式(请参见下面的代码)。我想知道如何在代码中的sqrt()之前正确使用+-

x <- seq(0,1,by=0.01)
y <- %+-%sqrt((.5^2)-(x-.5)^2)+.5
桑迪潘·戴(Sandipan Dey)

您可能希望将方程式设为参数形式,而不需要sqrt的+-。

theta <- seq(0,2*pi,0.01)
x <- 0.5 + 0.5*sin(theta)
y <- 0.5 + 0.5*cos(theta)
plot(x, y)
title(main= substitute(paste('x=(1+sin',theta,')/2, y=(1+cos', theta, ')/2')))

在此处输入图片说明

试试这个:

draw.circle <- function(stepsize=.01) {
  theta <- seq(0,2*pi,by=stepsize) 
  x <- 0.5 + 0.5*sin(theta) 
  y <- 0.5 + 0.5*cos(theta) 
  plot(x, y,type="n",xlim = c(0,1),ylim = c(0,1)) 
  segments(x,y,.5,.5)
}

draw.circle(.01)

在此处输入图片说明

draw.circle(.02)

在此处输入图片说明

draw.circle(.05)

在此处输入图片说明

本文收集自互联网,转载请注明来源。

如有侵权,请联系[email protected] 删除。

编辑于
0

我来说两句

0条评论
登录后参与评论

相关文章