Add Line

add_lines(lines, line)

Arguments

lines

Existing lines or empty (0-row) matrix.

line

Line to add, generated with `generate_line()`

Value

New line matrix.

Examples

#Generate a cube out of lines # \donttest{ cube_outline = generate_line(start = c(-1, -1, -1), end = c(-1, -1, 1)) %>% add_lines(generate_line(start = c(-1, -1, -1), end = c(-1, 1, -1))) %>% add_lines(generate_line(start = c(-1, -1, -1), end = c(1, -1, -1))) %>% add_lines(generate_line(start = c(-1, -1, 1), end = c(-1, 1, 1))) %>% add_lines(generate_line(start = c(-1, -1, 1), end = c(1, -1, 1))) %>% add_lines(generate_line(start = c(-1, 1, 1), end = c(-1, 1, -1))) %>% add_lines(generate_line(start = c(-1, 1, 1), end = c(1, 1, 1))) %>% add_lines(generate_line(start = c(1, 1, -1), end = c(1, -1, -1))) %>% add_lines(generate_line(start = c(1, 1, -1), end = c(1, 1, 1))) %>% add_lines(generate_line(start = c(1, -1, -1), end = c(1, -1, 1))) %>% add_lines(generate_line(start = c(1, -1, 1), end = c(1, 1, 1))) %>% add_lines(generate_line(start = c(-1, 1, -1), end = c(1, 1, -1))) rasterize_lines(cube_outline,fov=90,lookfrom=c(0,0,3))
#> Setting `lookat` to: c(0.00, 0.00, 0.00)
# }