safe.ifelse: Type safe if.else implementation

In smm52/timeBlocks: Converts Serial Measurement Data into Longitudinal Trajectory of Equally-sized Time Blocks

Type safe if.else implementation

Description

Type safe if.else implementation that make sure that the output has the same class as the yes condition part. This is important for dates for examples.

Usage

safe.ifelse(cond, yes, no)

Arguments

cond	the condition
yes	what happens if yes condition is met
no	what happens if no condition is not met

Value

type safe value

Examples

myDate1 <- NA
myDate2 <- as.Date('2000-01-31', '%Y-%m-%d')
safe.ifelse(is.na(myDate1),myDate2,myDate1)
class(safe.ifelse(is.na(myDate1),myDate2,myDate1))

ifelse(is.na(myDate1),myDate2,myDate1)
class(ifelse(is.na(myDate1),myDate2,myDate1))

smm52/timeBlocks documentation built on Nov. 27, 2022, 3:54 a.m.