data(searches)
searches
# Call to the function with data provided as data.frame:
if (FALSE) search.efficiency(searches)
# Alternative:
per <- searches$person
visi <- searches$visibility
det <- searches$detected
notdet <- searches$notdetected
if (FALSE) search.efficiency(person=per, visibility=visi, detected=det, notdetected=notdet)
Run the code above in your browser using DataLab