Test: CSS web scraping

Take a look at the chunk of HTML being read into test:

test <- read_html('
   <h1 class = "main">Hello world!</h1>
   ')

How would you extract the text Hello world! using rvest and CSS selectors?