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

2019년 5월 6일 (월) 03:01 판

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

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

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