[R] need help calculating the indicator function

[Rui Barradas]

Hello,

Please cc the list, R-Help is threaded and your doubt and answers might 
be of interest to others.

With a vector Y, you want 0 in all Y != l and 1 in all Y == l?


n_l <- function(Y, l) as.integer(Y == l)


Hope this helps,

Rui Barradas

Às 11:26 de 30/01/21, Ablaye Ngalaba escreveu:
> Hello Rui,
> thank you for answering me.
> I compiled your code, it's true that it works but it still gives the 
> value "3". What I want is to find either 1 if Y==l or 0 in case y 
> differs from l.
> 
> 
> Good day
> 
> Le sam. 30 janv. 2021 à 10:42, Ablaye Ngalaba <ablayengalaba using gmail.com 
> <mailto:ablayengalaba using gmail.com>> a écrit :
> 
>     Thanks.
> 
>     Le sam. 30 janv. 2021 à 05:38, Rui Barradas <ruipbarradas using sapo.pt
>     <mailto:ruipbarradas using sapo.pt>> a écrit :
> 
>         Hello,
> 
>         Maybe this?
> 
>         n_l <- function(Y, l, na.rm = FALSE) sum(Y == l, na.rm = na.rm)
> 
>         set.seed(2020)
>         q <- 6
>         y <- sample(q, 10, TRUE)
> 
>         l <- 4
>         n_l(y, l)
>         #[1] 3
> 
> 
>         Hope this helps,
> 
>         Rui Barradas
> 
> 
>         Às 14:27 de 29/01/21, Ablaye Ngalaba escreveu:
>          > Hello,
>          > please, I need to calculate the indicator function as I
>         underlined in my
>          > attached pdf file but I can't define a code in programming
>         language that
>          > deals with this case. Please help me with a code whether it's
>         in python or
>          > R can help me.
>          >
>          >
>          >
>          >     Sincerely.
>          >
>          >
>          > ______________________________________________
>          > R-help using r-project.org <mailto:R-help using r-project.org> mailing
>         list -- To UNSUBSCRIBE and more, see
>          > https://stat.ethz.ch/mailman/listinfo/r-help
>          > PLEASE do read the posting guide
>         http://www.R-project.org/posting-guide.html
>          > and provide commented, minimal, self-contained, reproducible
>         code.
>          >
>