# NOT RUN {
a <- NULL
print(a) # NULL
print(NVL(a,0)) # 0
b <- 1
print(b) # 1
print(NVL(b,0)) # 1
# Also,
print(NVL(NULL,1,0)) # 1
print(NVL(NULL,0,1)) # 0
print(NVL(NULL,NULL,0)) # 0
print(NVL(NULL,NULL,NULL)) # NULL
NVL(a) <- 2
a # 2
NVL(b) <- 2
b # still 1
# }
Run the code above in your browser using DataLab