You can buy this project and download/modify it how often you want.
d <- c {a,b,c,d} not a = p not b = a not c = b not d = d