[文本处理] 【已解决】批处理求均值的问题，大家帮忙~~

oqis

4.63  
4.75  
4.84  
4.78  
4.74  
4.59  
4.59  
4.59  
4.60  
4.80  
4.83  
4.75  
4.64  
4.62  
4.83  
4.72  
4.67  
4.69  
4.78  
4.79  
就是这列数字的合除以20等于多少

pcl_test

回复 1# oqis

批处理不支持小数的运算，可以借助第三方工具或是用vbs
conset.exe (http://bathome.net/thread-12865-1-1.html)

oqis

回复 2# pcl_test
能否帮我写一段，vbs也可以。

DAIC

@echo off
powershell -c "Get-Content a.txt | Foreach-Object {$s=0}{$s += [Double]($_)}{$s/20}"
pause
复制代码

amwfjhh

@if (0)==(0) echo off
setlocal enabledelayedexpansion

set "strParams="
for /f "delims=" %%i in (1.txt) do set "strParams=!strParams!%%i "
echo,传入参数为 %strParams%
cscript -nologo -e:jscript %~s0 %strParams%

pause & goto :EOF
@end

var nParmCount;
nParamCount = WScript.arguments.length;
var fSum=0, fAvg=0;
for (var i=0; i<nParamCount; i++) {
	var fTmp = parseFloat(WScript.arguments(i));
	fSum+=fTmp;
}
fAvg = fSum / nParamCount;
WScript.echo(nParamCount + "个数的总和为 : " + fSum + "   平均数为 : " + fAvg);
复制代码

terse

win7 系统 可试 POWERSHELL

cat .\b.txt|measure-object -average 
复制代码

非要BAT处理的话 那就加JS吧cript

@if(0)==(0) echo off
CScript.exe -NoLogo -E:JScript %0 < "b.txt"
pause&exit
@end
var text = WSH.StdIn.ReadAll().split('\r\n');
var len = text.length;
var cnt = 0;
for (var i = 0; i < len; i++) {
  var j = +text[i];
  cnt += j;
}
var avg = cnt / len;
WSH.echo(avg)
复制代码

oqis

回复 5# amwfjhh

不知何故，我运行有提示

oqis

回复 4# DAIC
可以运行计算结果，但是速度慢，可能是win7+PowerShell2.0的缘故吧？在更新。。。。。。

oqis

回复 6# terse
啊 一样的情况~

terse

回复  terse
啊 一样的情况~~~~~
oqis 发表于 2015-1-12 19:25

你什么环境

oqis

回复 10# terse
win7 精简版 可能少了什么？ 你看我要装点啥~~~~~~~~~~~~~~~~

oqis

回复 10# terse
要不把小数点都省去，计算出结果，再点上。也可以呀！没影响。

yiwuyun

gawk "{A[++i]=A[i]+$1;};END{print A[i]/i;}" 1.txt

apang

@echo off
setlocal enabledelayedexpansion
for /f %%a in (a.txt) do (
        set "x=%%~xa00"
        set "x=!x:.=!"
        set /a "n+=1,Sum+=%%~na00+1!x:~,2!-100"
)
set /a Avg=Sum/n
echo,!Avg:~,-2!.!Avg:~-2!
pause
复制代码

terse

回复  terse
要不把小数点都省去，计算出结果，再点上。也可以呀！没影响。
oqis 发表于 2015-1-12 20:13

6楼 powershell 也不好用吗
这个总不会精简掉了不