R語言-計算平均值不同函數的區(qū)別說明
函數mean
> mean(x) > num x1 x2 x3 10378050.50 89.45 81.18 80.45
此時對編號也求了平均值，不過往往我們只想對后面的數據求平均值。而且此時會出現一個警告。因為x是一個數據框，不是數值，所以不能直接用mean（）函數。
函數colMeans（）
> colMeans(x)
num x1 x2 x3
10378050.50 89.45 81.18 80.45
> colMeans(x)[c("x1","x2","x3")]
x1 x2 x3
89.45 81.18 80.45
選擇x數據框中x1，x2，x3直接求平均值就行
函數apply–功能更強大，不只是可以用在求平均值上
> apply(x, 2, mean)
num x1 x2 x3
10378050.50 89.45 81.18 80.45
使用apply，參數2的意思代表對列方向操作。
比如，求最大值和最小值
> apply(x[c("x1","x2","x3")], 2, max)
x1 x2 x3
100 90 96
補充：R語言平均值，中位數和眾數
1.平均值
平均值是通過取數值的總和并除以數據序列中的值的數量來計算。函數mean()用于在R中計算平均值。
語法
R中計算平均值的基本語法是 -
mean(x, trim = 0, na.rm = FALSE, ...)
以下是使用的參數的描述 -
x - 是輸入向量。
trim - 用于從排序的向量的兩端刪除一些觀測值。
na.rm - 用于從輸入向量中刪除缺少的值。
示例
# Create a vector. x <- c(17,8,6,4.12,11,8,54,-11,18,-7) # Find Mean. result.mean <- mean(x) print(result.mean)
當我們執(zhí)行上述代碼時，會產生以下結果 -
[1] 10.812
1.1.應用修剪選項
當提供trim參數時，向量中的值進行排序，然后從計算平均值中刪除所需數量的觀察值。
例如，當trim = 0.3時，每一端的3個值將從計算中刪除以找到均值。
在這種情況下，排序的向量為(-21，-5,2,3,42,7,8,12,18,54)，從用于計算平均值的向量中從左邊刪除：(-21，-5,2)和從右邊刪除：(12,18,54)這幾個值。
# Create a vector. x <- c(12,7,3,4.2,18,2,54,-21,8,-5) # Find Mean. result.mean <- mean(x,trim = 0.3) print(result.mean)
當我們執(zhí)行上述代碼時，會產生以下結果 -
[1] 5.55
1.2.應用NA選項
如果缺少值，則平均函數返回NA。要從計算中刪除缺少的值，請使用na.rm = TRUE。 這意味著刪除NA值。參考以下示例代碼 -
# Create a vector. x <- c(12,7,3,4.2,18,2,54,-21,8,-5,NA) # Find mean. result.mean <- mean(x) print(result.mean) # Find mean dropping NA values. result.mean <- mean(x,na.rm = TRUE) print(result.mean)
當我們執(zhí)行上述代碼時，會產生以下結果 -
[1] NA [1] 8.22
2.中位數
數據系列中的中間值被稱為中位數。R中使用median()函數來計算中位數。
語法
R中計算位數的基本語法是 -
median(x, na.rm = FALSE)
以下是使用的參數的描述 -
x - 是輸入向量。
na.rm - 用于從輸入向量中刪除缺少的值。
示例
# Create the vector. x <- c(12,7,3,4.2,18,2,54,-21,8,-5) # Find the median. median.result <- median(x) print(median.result)
當我們執(zhí)行上述代碼時，會產生以下結果 -
[1] 5.6
3.眾數
眾數是指給定的一組數據集合中出現次數最多的值。不同于平均值和中位數，眾數可以同時具有數字和字符數據。
R沒有標準的內置函數來計算眾數。因此，我們將創(chuàng)建一個用戶自定義函數來計算R中的數據集的眾數。該函數將向量作為輸入，并將眾數值作為輸出。
示例
# Create the function.
getmode <- function(v) {
uniqv <- unique(v)
uniqv[which.max(tabulate(match(v, uniqv)))]
}
# Create the vector with numbers.
v <- c(2,1,2,3,1,2,3,4,1,5,5,3,2,3)
# Calculate the mode using the user function.
result <- getmode(v)
print(result)
# Create the vector with characters.
charv <- c("baidu.com","tmall.com","yiibai.com","qq.com","yiibai.com")
# Calculate the mode using the user function.
result <- getmode(charv)
print(result)
當我們執(zhí)行上述代碼時，會產生以下結果 -
[1] 2 [1] "yiibai.com"
以上為個人經驗，希望能給大家一個參考，也希望大家多多支持腳本之家。如有錯誤或未考慮完全的地方，望不吝賜教。
相關文章
這篇文章主要介紹了R語言-修改(替換)因子變量的元素操作，具有很好的參考價值，希望對大家有所幫助。一起跟隨小編過來看看吧2021-04-04
在本篇文章里小編給大家整理的是一篇關于R語言符號知識點匯總內容，有需要的朋友們可以學習下。2021-03-03
這篇文章主要介紹了R語言 UTF-8各種問題的解決方案，具有很好的參考價值，希望對大家有所幫助。一起跟隨小編過來看看吧2021-04-04
這篇文章主要介紹了R語言入門之安裝R和Rstuido軟件，文中通過示例代碼介紹的非常詳細，對大家的學習或者工作具有一定的參考學習價值，需要的朋友們下面隨著小編來一起學習學習吧2021-03-03
這篇文章主要介紹了R語言 實現多行注釋的方式，具有很好的參考價值，希望對大家有所幫助。一起跟隨小編過來看看吧2021-04-04
在本篇文章里小編給大家整理的是一篇關于R語言關于數據幀的知識點詳解內容，有興趣的朋友們可以學習下。2021-04-04
這篇文章主要介紹了使用R語言批量修改文件名的方法,本文給大家介紹的非常詳細，對大家的學習或工作具有一定的參考借鑒價值，需要的朋友可以參考下2021-03-03
本文將結合實例代碼，介紹R語言的Dataframe常用操作使用，文中通過示例代碼介紹的非常詳細，需要的朋友們下面隨著小編來一起學習學習吧2021-06-06
日期時間是常用的一種類型，本文主要介紹了R語言日期時間的使用，文中通過示例代碼介紹的非常詳細，具有一定的參考價值，感興趣的小伙伴們可以參考一下2022-03-03
本文主要介紹了R語言數據類型與相應運算的實現，文中通過示例代碼介紹的非常詳細，具有一定的參考價值，感興趣的小伙伴們可以參考一下2022-03-03