##--- Alle Betriebssysteme ---
- Ist das Betriebssystem aktuell? Ggf. aktualisieren.
- Ist R aktuell? Ggf. aktualisieren.
| SLIDES := $(patsubst %.md,%.md.slides.pdf,$(wildcard *.md)) | |
| HANDOUTS := $(patsubst %.md,%.md.handout.pdf,$(wildcard *.md)) | |
| all : $(SLIDES) $(HANDOUTS) | |
| %.md.slides.pdf : %.md | |
| pandoc $^ -t beamer --slide-level 2 -o $@ | |
| %.md.handout.pdf : %.md | |
| pandoc $^ -t beamer --slide-level 2 -V handout -o $@ |
| # plot normal distribution with ggplot2, simply | |
| library(cowplot) | |
| p1 <- ggplot(data = data.frame(x = c(-3, 3)), aes(x)) + | |
| stat_function(fun = dnorm, n = 101, args = list(mean = 0, sd = 1)) + ylab("") + | |
| scale_y_continuous(breaks = NULL) | |
| p1 |
| # Exam grading, as a convenience function for teachers | |
| # Sebastian Sauer | |
| # Stand: 2016-05-20 | |
| # need to be installed upfront with "install.packages()" | |
| library(ggplot2) | |
| library(car) | |
| library(tidyr) |
| # normal distribution with serveral shaded areas | |
| library(ggplot2) | |
| library(dplyr) | |
| mean.1 <-0 | |
| sd.1 <- 1 | |
| zstart <- 2 | |
| zend <- 3 | |
| zcritical <- 1.65 |
| plot_beta <- function(mean_1 = 0, mean_2 = 1, | |
| sd_1 = 1, sd_2 = 1, | |
| fill_alpha = "red", | |
| fill_beta = "green", | |
| alpha = .05, zend = 3, | |
| title = ""){ | |
| # plots alpha error and beta error in two normal curves | |
| # arguments: |
| \documentclass{article} | |
| \usepackage[margin=2cm,noheadfoot]{geometry} | |
| %\usepackage{fancyhdr} | |
| %\pagestyle{fancyplain} | |
| \usepackage{eso-pic} | |
| --- | |
| name: ggplotly | |
| layout: post | |
| title: Make your ggplots shareable, collaborative, and with D3 | |
| date: 2014-04-17 | |
| author: Matt Sundquist | |
| authorurl: https://plot.ly/team | |
| tags: | |
| - R | |
| - API |
| MLE Binomial Shiny App | |
| Base R code created by Gail Potter | |
| Shiny app files created by Gail Potter |