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

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:

主站蜘蛛池模板: 枞阳县| 酉阳| 登封市| 娄底市| 曲靖市| 淳化县| 玉溪市| 望奎县| 疏勒县| 蓬莱市| 丹东市| 青冈县| 台湾省| 平昌县| 行唐县| 婺源县| 临洮县| 海城市| 中方县| 广元市| 辉县市| 从江县| 永济市| 南召县| 新和县| 岳西县| 嵊泗县| 水城县| 怀柔区| 乌拉特后旗| 藁城市| 伊宁县| 武宁县| 上蔡县| 淄博市| 高阳县| 卢龙县| 昂仁县| 凤冈县| 冕宁县| 化州市|