카타 7급 Remove the minimum

Jmnote bot (토론 | 기여)님의 2021년 7월 31일 (토) 11:08 판 (봇: 자동으로 텍스트 교체 (-</source> +</syntaxhighlight>, -<source +<syntaxhighlight ))
(차이) ← 이전 판 | 최신판 (차이) | 다음 판 → (차이)

R[ | ]

remove_smallest <- function(numbers){
  if( length(numbers)< 1 ) return(numbers)
  numbers[-match( min(numbers), numbers )]
}
remove_smallest <- function(numbers) {
  numbers[-which.min(numbers)]
}
remove_smallest <- function(n) n[-which.min(n)]
문서 댓글 ({{ doc_comments.length }})
{{ comment.name }} {{ comment.created | snstime }}