RosettaCodeData/Task/Binary-search/R/binary-search-3.r
Ingy döt Net 86c034bb8b new files
2013-04-10 12:38:42 -07:00

4 lines
112 B
R

a <- 1:100
IterBinSearch(a, 50)
BinSearch(a, 50, 1, length(a)) # output 50
IterBinSearch(a, 101) # outputs NULL