想不通的分段函数; 没搞懂的核光滑>///<

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

想要得到这样的函数:
y =  2x , x<=3;
       5   , else.
code如下:

1. > y = function(x)
   
2. +       { if (x<=3) y=2*x
   
3. +         else      y=5}
   
4. > curve(y,0,6)

复制代码

Warning message:
In if (x <= 3) y = 2 * x else y = 5 :
  条件的长度大于一，因此只能用其第一元素
这是为什么呢?
----------------------------------------------------
再附加一个核光滑回归问题:^_^
ksmooth函数只能采用box和normal两个核,有没有用biweight的?
对于用GCV方法选取bandwidth,需要单独使用mgcv吗?
ksmooth用法如下:
ksmooth(x, y, kernel = c("box", "normal"), bandwidth = 0.5,
        range.x = range(x),
        n.points = max(100, length(x)), x.points)
-----------------------------------------------------
期待回复ing 谢谢!

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：分段函数 想不通 function Message warning 函数 分段

同问！！！！！！！！！！！！！！！

"if" is not vectorised and "age" is a vector. Try the following test:

if(c(TRUE, FALSE)) "TRUE" else "FALSE"

You really need to use "ifelse".

ifelse(c(TRUE, FALSE), "TRUE", "FALSE")

As others have suggested, you might want to look at ?cut.

--sundar

"if" is not vectorised and "age" is a vector. Try the following test:

if(c(TRUE, FALSE)) "TRUE" else "FALSE"

You really need to use "ifelse".

ifelse(c(TRUE, FALSE), "TRUE", "FALSE")

As others have suggested, you might want to look at ?cut.

--sundar