if (FALSE) {
#navigate to wikipedia, type "Hello" into the search box, press enter
parsel::go("https://www.wikipedia.org/") %>>%
parsel::type(using = "id",
value = "'searchInput'",
name = "searchbox",
text = c("Hello","\uE007")) %>>%
show()
#navigate to wikipeda, type content stored in external object "x" into search box
parsel::go("https://www.wikipedia.org/") %>>%
parsel::type(using = "id",
value = "'searchInput'",
name = "searchbox",
text_object = "x") %>>%
show()
}
Run the code above in your browser using DataLab