/ R

Happy Nerd Mother's Day

Bereits zum Valentins-Tag bin ich über eine kleine Nerd-Spielerei gestolpert. Damals habe ich es leider nicht rechtzeitig geschafft darüber zu bloggen - glücklicherweise eignet sie sich aber mindestens genauso gut für den Muttertag :)

Wie einige sicher wissen, bin ich ein großer Fan von Telegram das in meinen Augen einfach vieles sehr viel cooler macht als WhatsApp. Eine schöne Sache sind die Bots. So wie es eine App für alles gibt, gibt es für fast alles einen Telegram-Bot. Natürlich (!!1elf!) gibt es auch einen R-Bot. yeah!

Fange einen Chat mit dem Bot an und schicke ihm R-Code. Er berechnet ihn dann für dich -- wie geil ist das denn bitte?? Und was wäre passender zum Mutterag als folgendes kleines Code-Schnipsel?

Viel Spaß damit <3

dat <- data.frame(t = seq(0, 2 * pi, by = .1))
xhrt <- function(t) 16 * sin(t)^3
yhrt <- function(t) 13 * cos(t) - 5 * cos(2 * t) - 2 * cos(3 * t) - cos(4 * t)
dat$x <- xhrt(dat$t)
dat$y <- yhrt(dat$t)
with(dat, plot(x, y, type = "l"))

Danke an Mara