官术网_书友最值得收藏!

Applying families of functions 

The apply family of functions allow users to easily apply custom vector functions on matrices, lists, and other R data structures. Operations such as summing by rows and columns or more complex ones, such as functions with conditional logic, can be applied using apply commands. These are extremely convenient, not only from an ease-of-use perspective but also from a performance standpoint. In general, vectorised operations will almost always be faster and more efficient than looping, such as with for-next loops in R:

# apply 
 
# Usage 
#  
# apply(X, MARGIN, FUN, ...) 
# Arguments 
#  
# X: an array, including a matrix. 
# MARGIN: a vector giving the subscripts which the function will be applied over. E.g., for a matrix 1 indicates  
# rows, 2 indicates columns, c(1, 2) indicates rows and columns. Where X has named dimnames, it can be a  
# character vector selecting dimension names. 
 
apply(state[,-ncol(state)], 2, sum) # Sum of all values in the numeric columns 
apply(state[,-ncol(state)], 2, mean) # Mean of all values in the numeric columns 

The output is as follows:

lapply, which belongs to the apply family of functions, is used to the apply functions on lists in R:

# lapply - list apply which is similar to apply, but can be also used for other R object types
## Produces the output as a list
lapply(state[,-ncol(state)], function(x) {list(MIN=min(x), MAX=max(x), MEAN=mean(x))})

The output is as follows:

 sapply—it provides the same functionality as lapply but, instead of a list output, sapply returns the result as a vector:

# sapply - simplifies the output (eg., produce a vector instead of a list) 
sapply(state[,-ncol(state)], function(x) {list(MIN=min(x), MAX=max(x), MEAN=mean(x))}) 

The output of the preceding code is as follows:

主站蜘蛛池模板: 页游| 兴安盟| 大丰市| 搜索| 塔河县| 盱眙县| 厦门市| 舞钢市| 大渡口区| 泰安市| 贵溪市| 五台县| 博野县| 中西区| 望谟县| 明星| 荔波县| 天门市| 肃北| 临武县| 通榆县| 晋州市| 常德市| 桦川县| 湄潭县| 宜都市| 宿迁市| 布尔津县| 平顶山市| 霍州市| 江源县| 临武县| 灌阳县| 泗水县| 绵竹市| 行唐县| 辽阳市| 织金县| 昭觉县| 维西| 平泉县|