minimalistic R [🇷 for BE/BA]

posted by Helmut Homepage – Vienna, Austria, 2013-07-24 03:04 (4706 d 07:37 ago) – Posting: # 11044
Views: 10,419

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,653 posts in 4,991 threads, 1,571 registered users;
142 visitors (0 registered, 142 guests [including 20 identified bots]).
Forum time: 10:41 CEST (Europe/Vienna)

Outside his own ever-narrowing field of specialization,
a scientist is a layman.
What members of an academy of science have in common
is a certain form of semiparasitic living.    Erwin Chargaff

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