knitr::opts_chunk$set(echo = FALSE, warning = FALSE, error = FALSE)
report_office_location <- " > [Office Location]" # CHANGE # For example: # "National Oceanic and Atmospheric Administration\n # 1315 East-West Highway [bldg./room]\n # Silver Spring, MD 20910"\n report_office <- "" # For example: AFSC, NEFSC # CHANGE report_num <- "###" # CHANGE report_NOAA_leaders <- "U.S. Department of Commerce Wynn Coggins, Acting Secretary National Oceanic and Atmospheric Administration Benjamin Friedman, Acting NOAA Administrator National Marine Fisheries Service Paul Doremus, Acting Assistant Administrator for Fisheries"
r report_title
By
r report_authors
{width=25%}
U.S. Department of Commerce
National Oceanic and Atmospheric Administration
National Marine Fisheries Service
r report_office_location
r months(Sys.Date())
r as.numeric(format(as.Date(Sys.Date(),'%Y-%m-%d'),'%Y'))
\newpage
r report_title
By
r report_authors
NOAA Technical Memorandum NMFS-[r report_office
]-r report_num
r months(Sys.Date())
r as.numeric(format(as.Date(Sys.Date(),'%Y-%m-%d'),'%Y'))
{width=20%}
r report_NOAA_leaders
\newpage
Recommended citation:
r report_authors
. r report_yr
. r report_title
NOAA Tech. Memo. NMFS-[r report_office
]-r report_num
,
p.
Copies of this report may be obtained from:
r report_office_location
Or online at:
http://spo.nmfs.noaa.gov/tech-memos/
[or alternate URL for OHC, OSF or OPR pages]
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.