This function creates an apero in a room of given size. Guests stick to a minimum distance of each other in order to stay safe.
apero(room_length = 6, room_width = 4, min_distance = 1.5, margin = 0.3)
Length of room in meter.
Width of room in meter.
Minimum distance in meter guests should have from each other.
How close to the walls do guests stand (in meter)?
An object of class "apero" with the following elements:
room_length
: User input.
room_width
: User input.
min_distance
: User input.
margin
: User input.
guests
: data.frame with x and y coordinates of guests (including yourself).
x <- apero()
x
#> The apero takes place in a 6m x 4m room and the safety distance is 1.5m.
#> A whopping 12 guests are here (incl. you). Nice apero so far!
x2 <- apero(1, 1)
plot(x2)