[R] Help in using unique count by match function

[Rui Barradas]

Hello,


arunkumar1111 wrote
> 
> Hi
> 
> My code looks like this
> 
> I have two parameters x and par1. X contains values and par1 contains the
> function which i required to  use
> 
> if par1 is max then output should be max(x). 
> 
> 	       FUN <- match.fun(par1)
> 		result=FUN(x)
> 
> Is it possible to incorporate the unique count of x within this code
> 
> eg
> 
> x=("a","b","a","c")  . The output should be 3
> 

Yes, it's possible. See if this is what you want.


fun <- function(x, par1){
	FUN <- match.fun(par1)
	result <- FUN(x)
	result
}

x <- c("a","b","a","c")

fun(x, max)

# using an unnamed function, 'y' is just a place holder
fun(x, function(y) length(unique(y)))

# using a named function
count.uniq <- function(y) length(unique(y))
fun(x, count.uniq)

Hope this helps,

Rui Barradas


--
View this message in context: http://r.789695.n4.nabble.com/Help-in-using-unique-count-by-match-function-tp4569859p4571812.html
Sent from the R help mailing list archive at Nabble.com.