-
Notifications
You must be signed in to change notification settings - Fork 12
/
Minnesota_Twin_Cities.R
123 lines (105 loc) · 4.13 KB
/
Minnesota_Twin_Cities.R
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
# Minnesota Twin Cities | 2023 08 22
# Colors of the University of Minnesota, USA
# -------------------------------------------
# Information
# cur_pals:"minnesotatwin_1", "minnesotatwin_2" (2)
# inst: "University of Minnesota Twin Cities"
# country: USA
# URL: "https://twin-cities.umn.edu"
# Color source:
# URL: https://university-relations.umn.edu/resources/colors-and-type
# last check: 20230-07-05
# Color palettes:
# - minnesotatwin_1: Primary colors of UMN ------
#' Primary colors of the University of Minnesota Twin Cities, USA
#'
#' \code{minnesotatwin_1} provides the two primary colors
#' of the \href{https://twin-cities.umn.edu/}{University of Minnesota}, USA.
#'
#' The 2 primary colors are
#' \code{"minnesotatwin_maroon"} (defined as HEX #7A0019) and
#' \code{"minnesotatwin_gold"} (defined as HEX #FFCC33).
#'
#' \code{minnesotatwin_1} uses the HEX color definitions.
#'
#' @return
#' A named vector of colors (HEX/HTML codes of type character).
#'
#' @author
#' \strong{unicol}, 2023-07-01.
#'
#' @source
#' Color definitions are based on the
#' \href{https://university-relations.umn.edu/resources/colors-and-type}{UMN website}.
#'
#' @examples
#' minnesotatwin_1
#' unikn::seecol(minnesotatwin_1,
#' main = "University of Minnesota Twin Cities") # view color palette
#'
#' @family U.S. university color palettes
#'
#' @seealso
#' \code{\link{minnesotatwin_2}} for the secondary colors of UMN;
#' \code{\link{seecol}} for viewing and comparing color palettes;
#' \code{\link{usecol}} for using color palettes;
#' \code{\link{simcol}} for finding similar colors;
#' \code{\link{newpal}} for defining new color palettes;
#' \code{\link{grepal}} for finding named colors.
#'
#' @export
minnesotatwin_1 <- unikn::newpal(col = c("#7A0019","#FFCC33"),
names = c("minnesotatwin_maroon", "minnesotatwin_gold"),
as_df = FALSE)
# - minnesotatwin_2: Secondary colors of UMN ------
#' Secondary colors of the University of Minnesota Twin Cities, USA
#'
#' \code{minnesotatwin_2} provides the 8 secondary colors
#' of the \href{https://twin-cities.umn.edu/}{University of Minnesota Twin Cities}, USA.
#'
#' The 8 secondary colors are
#' \code{"minnesotatwin_dark-marron"} (defined as HEX #5B0013),
#' \code{"minnesotatwin_dark_gold"} (defined as HEX #FFB71E),
#' \code{"minnesotatwin_darker_gray"} (defined as HEX #333333),
#' \code{"minnesotatwin_medium_grey"} (defined as HEX #777677),
#' \code{"minnesotatwin_light_maroon"} (defined as HEX #900021),
#' \code{"minnesotatwin_light_gold"} (defined as HEX #FFDE7A),
#' \code{"minnesotatwin_dark_grey"} (defined as HEX #5A5A5A), and
#' \code{"minnesotatwin_light_grey"} (defined as HEX #D5D6D2).
#'
#' \code{minnesotatwin_2} uses the HEX color definitions.
#'
#' @return
#' A named vector of colors (HEX/HTML codes of type character).
#'
#' @author
#' \strong{unicol}, 2023-07-01.
#'
#' @source
#' Color definitions are based on the
#' \href{https://university-relations.umn.edu/resources/colors-and-type}{UMN website}.
#'
#' @examples
#' minnesotatwin_2
#' unikn::seecol(minnesotatwin_2,
#' main = "University of Minnesotatwin Twin Cities") # view color palette
#'
#' @family U.S. university color palettes
#'
#' @seealso
#' \code{\link{minnesotatwin_1}} for the primary colors of UMN;
#' \code{\link{seecol}} for viewing and comparing color palettes;
#' \code{\link{usecol}} for using color palettes;
#' \code{\link{simcol}} for finding similar colors;
#' \code{\link{newpal}} for defining new color palettes;
#' \code{\link{grepal}} for finding named colors.
#'
#' @export
minnesotatwin_2 <- unikn::newpal(col = c("#5B0013","#FFB71E","#333333", "#777677",
"#900021","#FFDE7A","#5A5A5A","#D5D6D2"),
names = c("minnesotatwin_dark_marron", "minnesotatwin_dark_gold", "minnesotatwin_darker_grey", "minnesotatwin_medium_grey",
"minnesotatwin_light_maroon", "minnesotatwin_light_gold", "minnesotatwin_dark_grey", "minnesotatwin_light_grey"),
as_df = FALSE)
## ToDo:------
# - etc.
## eof.-------