minimalistic R [🇷 for BE/BA]

posted by Helmut Homepage – Vienna, Austria, 2013-07-24 03:04 (4348 d 14:19 ago) – Posting: # 11044
Views: 9,056

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,677 registered users;
38 visitors (0 registered, 38 guests [including 12 identified bots]).
Forum time: 17:23 CEST (Europe/Vienna)

Philosophy, like medicine, has plenty of drugs, few good remedies,
and hardly any specific cures.    Sebastien-Roch Nicolas de Chamfort

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