## Not run:
# page <- safe_html(paste0('http://www.sejm.gov.pl/Sejm7.nsf/',
# 'wypowiedz.xsp?posiedzenie=15&dzien=1&wyp=0'))
# page <- html_nodes(page, '.stenogram')
# statements_links <- html_nodes(page, 'h2 a')
# statements_get_statements_data(statements_links,
# home_page = 'http://www.sejm.gov.pl/Sejm7.nsf/')## End(Not run)
Run the code above in your browser using DataLab