"카타 7급 Most digits"의 두 판 사이의 차이

2021년 7월 31일 (토) 11:08 기준 최신판

find_longest <- function(arr) {
  arr[which.max(nchar(arr))]
}

find_longest <- function(arr) {
  n=nchar(arr)
  return(arr[n==max(n)][1])
}

@@ 1번째 줄: / 1번째 줄: @@
 ==R==
 {{카타|7급|R|4}}
-<source lang='r'>
+<syntaxhighlight lang='r'>
-</source>
+find_longest <- function(arr) {
+  arr[which.max(nchar(arr))]
+}
+</syntaxhighlight>
+<syntaxhighlight lang='r'>
+find_longest <- function(arr) {
+  n=nchar(arr)
+  return(arr[n==max(n)][1])
+}
+</syntaxhighlight>