1
1
test_that(" USA state map drawn" , {
2
2
skip_if_not_installed(" mapproj" ) # required for coord_map()
3
3
skip_if_not_installed(" maps" ) # required for map_data()
4
- skip_if(packageVersion(" base" ) < " 3.5.0" )
5
4
us_map <- map_data(" usa" )
6
5
p_us <- ggplot(us_map , aes(x = long , y = lat , group = group ))
7
6
expect_doppelganger(
@@ -15,7 +14,6 @@ test_that("USA state map drawn", {
15
14
test_that(" coord_map scale position can be switched" , {
16
15
skip_if_not_installed(" mapproj" ) # required for coord_map()
17
16
skip_if_not_installed(" maps" ) # required for map_data()
18
- skip_if(packageVersion(" base" ) < " 3.5.0" )
19
17
us_map <- map_data(" usa" )
20
18
p_us <- ggplot(us_map , aes(x = long , y = lat , group = group ))
21
19
expect_doppelganger(
@@ -31,7 +29,6 @@ test_that("coord_map scale position can be switched", {
31
29
test_that(" Inf is squished to range" , {
32
30
skip_if_not_installed(" mapproj" ) # required for coord_map()
33
31
skip_if_not_installed(" maps" ) # required for mproject()
34
- skip_if(packageVersion(" base" ) < " 3.5.0" )
35
32
d <- cdata(
36
33
ggplot(data_frame(x = 0 , y = 0 )) +
37
34
geom_point(aes(x ,y )) +
0 commit comments