# NOT RUN {
search <- html_form(read_html("http://www.google.com"))[[1]]
set_values(search, q = "My little pony")
set_values(search, hl = "fr")
# }
# NOT RUN {
set_values(search, btnI = "blah")
# }
Run the code above in your browser using DataCamp Workspace