Sandbox

Probando

<R output="html" iframe="width:100%;height:250px;"> prob=0.15; nmin=1; nmax=15; x=6 m <-pbinom(rep(0:x, each = nmax-nmin+1), rep(nmin:nmax,x), prob) dim(m) <- c(nmax-nmin+1,x+1) m <- t(m) colnames(m) <- format(nmin:nmax) rownames(m) <- format(0:x) outHTML(rhtml, m, title="x\n", format="f", digits=4) </R>

<R output="display" iframe="width:400px;height:400px"> pdf(rpdf, width=5, height=5) n <- 10 prob <- 0.2 x <- seq(0, n, 1) p <- dbinom(x, n, prob) param <- list(n, prob) main <- c("Binomialverteilung - Wahrscheinlichkeitsfunktion", paste (c("Stichprobenumfang n", "Wahrscheinlichkeit p"), param, sep="=")) plot(x,p, type="h", main=main) </R>

<R>1:20</R>

$\int _{-N}^{N}e^{x}\,dx$

hola [1]

1. Shaner NC, Campbell RE, Steinbach PA, Giepmans BN, Palmer AE, and Tsien RY. Improved monomeric red, orange and yellow fluorescent proteins derived from Discosoma sp. red fluorescent protein. Nat Biotechnol. 2004 Dec;22(12):1567-72. DOI:10.1038/nbt1037 |
2. Ubhayasekera W, Muñoz IG, Vasella A, Ståhlberg J, and Mowbray SL. Structures of Phanerochaete chrysosporium Cel7D in complex with product and inhibitors. FEBS J. 2005 Apr;272(8):1952-64. DOI:10.1111/j.1742-4658.2005.04625.x |

1. 2000jgim pmid=11089718

3. Lee R, Localio AR, Armstrong K, Malkowicz SB, Schwartz JS, and Free PSA Study Group. A meta-analysis of the performance characteristics of the free prostate-specific antigen test. Urology. 2006 Apr;67(4):762-8. DOI:10.1016/j.urology.2005.10.052 |
4. Erol H, Beder N, Calişkan T, Dündar M, Unsal A, and Culhaci N. Can the effect of antibiotherapy and anti-inflammatory therapy on serum PSA levels discriminate between benign and malign prostatic pathologies?. Urol Int. 2006;76(1):20-6. DOI:10.1159/000089730 |