minimalistic R [🇷 for BE/BA]

posted by Helmut Homepage – Vienna, Austria, 2013-07-24 03:04 (4350 d 00:50 ago) – Posting: # 11044
Views: 9,059

Hi ElMaestro!

THX for the code and testing my visual acuity for the second time. :cool: R is an outstanding beast I will never master. What ’bout:

time <- c( 0,  1, 1.5, 2,  4,  5,  6,  7,  8,  9)
conc <- c(NA, NA,  NA, 5, 19, 56, 53, 46, 40, NA)
data <- data.frame(time, conc)
cat("Tmax =", data$time[which(data$conc == max(data$conc[complete.cases(data)]))],
    "\nTlag =", data$time[which.max(complete.cases(data))-1], "\n")

Dif-tor heh smusma 🖖🏼 Довге життя Україна! [image]
Helmut Schütz
[image]

The quality of responses received is directly proportional to the quality of the question asked. 🚮
Science Quotes

Complete thread:

UA Flag
Activity
 Admin contact
23,424 posts in 4,927 threads, 1,672 registered users;
34 visitors (0 registered, 34 guests [including 9 identified bots]).
Forum time: 03:55 CEST (Europe/Vienna)

Medical researches can be divided into two sorts:
those who think that meta is better and those
who believe that pooling is fooling.    Stephen Senn

The Bioequivalence and Bioavailability Forum is hosted by
BEBAC Ing. Helmut Schütz
HTML5