A short description of the post.
corp_tax <- read_excel(here("corp_tax.xlsx"))
result <- corp_tax %>%
filter(company == 'NVR')
result
# A tibble: 1 x 5
company profit tax tax_rate industry
<chr> <dbl> <dbl> <dbl> <chr>
1 NVR 923. 126. 0.137 Engineering & construction
NVR is in the Engineering & construction industry. It had a profit of \$ 922.694 million and tax of \$ 126.358 million. Its tax rates was 13.7 % Distill is a publication format for scientific and technical writing, native to the web.
Learn more about using Distill at https://rstudio.github.io/distill.