+ - 0:00:00
Notes for current slide
Notes for next slide
iris[c(1:3, 51:53, 101:104),]
Sepal.Length Sepal.Width Petal.Length Petal.Width Species
1 5.1 3.5 1.4 0.2 setosa
2 4.9 3.0 1.4 0.2 setosa
3 4.7 3.2 1.3 0.2 setosa
51 7.0 3.2 4.7 1.4 versicolor
52 6.4 3.2 4.5 1.5 versicolor
53 6.9 3.1 4.9 1.5 versicolor
101 6.3 3.3 6.0 2.5 virginica
102 5.8 2.7 5.1 1.9 virginica
103 7.1 3.0 5.9 2.1 virginica
104 6.3 2.9 5.6 1.8 virginica
1 / 1
iris[c(1:3, 51:53, 101:104),] %>%
flextable(col_keys =
c("Species", "col_1",
"Sepal.Length",
"Petal.Length"))

Species

Sepal.Length

Petal.Length

setosa

5.1

1.4

setosa

4.9

1.4

setosa

4.7

1.3

versicolor

7.0

4.7

versicolor

6.4

4.5

versicolor

6.9

4.9

virginica

6.3

6.0

virginica

5.8

5.1

virginica

7.1

5.9

virginica

6.3

5.6

1 / 1
iris[c(1:3, 51:53, 101:104),] %>%
flextable(col_keys =
c("Species", "col_1",
"Sepal.Length",
"Petal.Length")) %>%
theme_vanilla()

Species

Sepal.Length

Petal.Length

setosa

5.1

1.4

setosa

4.9

1.4

setosa

4.7

1.3

versicolor

7.0

4.7

versicolor

6.4

4.5

versicolor

6.9

4.9

virginica

6.3

6.0

virginica

5.8

5.1

virginica

7.1

5.9

virginica

6.3

5.6

1 / 1
iris[c(1:3, 51:53, 101:104),] %>%
flextable(col_keys =
c("Species", "col_1",
"Sepal.Length",
"Petal.Length")) %>%
theme_vanilla() %>%
autofit()

Species

Sepal.Length

Petal.Length

setosa

5.1

1.4

setosa

4.9

1.4

setosa

4.7

1.3

versicolor

7.0

4.7

versicolor

6.4

4.5

versicolor

6.9

4.9

virginica

6.3

6.0

virginica

5.8

5.1

virginica

7.1

5.9

virginica

6.3

5.6

1 / 1
iris[c(1:3, 51:53, 101:104),] %>%
flextable(col_keys =
c("Species", "col_1",
"Sepal.Length",
"Petal.Length")) %>%
theme_vanilla() %>%
autofit() %>%
empty_blanks()

Species

Sepal.Length

Petal.Length

setosa

5.1

1.4

setosa

4.9

1.4

setosa

4.7

1.3

versicolor

7.0

4.7

versicolor

6.4

4.5

versicolor

6.9

4.9

virginica

6.3

6.0

virginica

5.8

5.1

virginica

7.1

5.9

virginica

6.3

5.6

1 / 1
iris[c(1:3, 51:53, 101:104),] %>%
flextable(col_keys =
c("Species", "col_1",
"Sepal.Length",
"Petal.Length")) %>%
theme_vanilla() %>%
autofit() %>%
empty_blanks() %>%
set_header_labels(
Sepal.Length = "Sepal length",
Sepal.Width = "Sepal width",
Petal.Length = "Petal length",
Petal.Width = "Petal width" )

Species

Sepal length

Petal length

setosa

5.1

1.4

setosa

4.9

1.4

setosa

4.7

1.3

versicolor

7.0

4.7

versicolor

6.4

4.5

versicolor

6.9

4.9

virginica

6.3

6.0

virginica

5.8

5.1

virginica

7.1

5.9

virginica

6.3

5.6

1 / 1
iris[c(1:3, 51:53, 101:104),] %>%
flextable(col_keys =
c("Species", "col_1",
"Sepal.Length",
"Petal.Length"))

Species

Sepal.Length

Petal.Length

setosa

5.1

1.4

setosa

4.9

1.4

setosa

4.7

1.3

versicolor

7.0

4.7

versicolor

6.4

4.5

versicolor

6.9

4.9

virginica

6.3

6.0

virginica

5.8

5.1

virginica

7.1

5.9

virginica

6.3

5.6

1 / 1
Paused

Help

Keyboard shortcuts

, , Pg Up, k Go to previous slide
, , Pg Dn, Space, j Go to next slide
Home Go to first slide
End Go to last slide
Number + Return Go to specific slide
b / m / f Toggle blackout / mirrored / fullscreen mode
c Clone slideshow
p Toggle presenter mode
t Restart the presentation timer
?, h Toggle this help
Esc Back to slideshow