R语言 负数开奇次方根

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

发现R语言无法计算负数的奇次方根，下面跟大家分享一段自己写的代码用于计算负数的奇次方根。原理很简单，举个例子，就是，(-a)^(n) = (-1)^n * a^n，其中，a>0，1/n为奇数。

代码如下：
Cal_root = function(n,Neg_value){
  if(Neg_value >= 0) stop("Neg_value 应该为负数")
  if(n %% 2 == 0 ) stop("n 应该是奇数")
  if(n < 1 ) stop("n 应该大于1")
  value = -1 * abs(Neg_value)^(1/n)
  return(value)
}

该函数开几次根就将n设置为几，比如-20开3次方根，则
# example
Cal_root(3,-20)

结果：-2.714418

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：R语言 负数开奇次方根

thanks for sharing