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 at gmail.com > <mailto:ablayengalaba at gmail.com>> a ?crit?: > > Thanks. > > Le?sam. 30 janv. 2021 ??05:38, Rui Barradas <ruipbarradas at sapo.pt > <mailto:ruipbarradas at 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 at r-project.org <mailto:R-help at 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. > > >