Module:Sandbox/Yurik - Revision history

Frietjes: Undid revision 833137713 by Frietjes (talk)

2018-03-29T21:21:51Z

Undid revision 833137713 by Frietjes (talk)

← Previous revision		Revision as of 21:21, 29 March 2018
Line 8:		Line 8:
	local args = getArgs(frame, { wrappers = wrapsTemplate })		local args = getArgs(frame, { wrappers = wrapsTemplate })
	local dataPage = assert(args.data, 'Missing "data" parameter')		local dataPage = assert(args.data, 'Missing "data" parameter')
	args['data'] = nil		args.data = nil

	local monthlyHigh, monthlyLow = {}, {}		local monthlyHigh, monthlyLow = {}, {}

Frietjes at 21:21, 29 March 2018

2018-03-29T21:21:21Z

← Previous revision		Revision as of 21:21, 29 March 2018
Line 8:		Line 8:
	local args = getArgs(frame, { wrappers = wrapsTemplate })		local args = getArgs(frame, { wrappers = wrapsTemplate })
	local dataPage = assert(args.data, 'Missing "data" parameter')		local dataPage = assert(args.data, 'Missing "data" parameter')
	args.data = nil		args['data'] = nil

	local monthlyHigh, monthlyLow = {}, {}		local monthlyHigh, monthlyLow = {}, {}

Yurik at 00:14, 3 January 2017

2017-01-03T00:14:13Z

← Previous revision		Revision as of 00:14, 3 January 2017
Line 28:		Line 28:

	for key, row in pairs(mw.ext.data.get(dataPage).data) do		for key, row in pairs(mw.ext.data.get(dataPage).data) do
	-- First column is in [0], not [1], needs special handling
	local date, highTemp, avgHighTemp, avgLowTemp, lowTemp, precip, snowfall, precipDays, snowfallDays = unpack(row)		local date, highTemp, avgHighTemp, avgLowTemp, lowTemp, precip, snowfall, precipDays, snowfallDays = unpack(row)

Yurik: metric

2016-12-15T08:07:48Z

metric

← Previous revision		Revision as of 08:07, 15 December 2016
Line 47:		Line 47:

	local months = {'Jan','Feb','Mar','Apr','May','Jun','Jul','Aug','Sep','Oct','Nov','Dec'}		local months = {'Jan','Feb','Mar','Apr','May','Jun','Jul','Aug','Sep','Oct','Nov','Dec'}
	for i=1, 12 do args[months[i] .. ' record high F'] = monthlyHigh[i] end		for i=1, 12 do args[months[i] .. ' record high C'] = monthlyHigh[i] end
	for i=1, 12 do args[months[i] .. ' record low F'] = monthlyLow[i] end		for i=1, 12 do args[months[i] .. ' record low C'] = monthlyLow[i] end
	for i=1, 12 do args[months[i] .. ' avg record high F'] = string.format("%.1f", highSum[i] / highCount[i]) end		for i=1, 12 do args[months[i] .. ' avg record high C'] = string.format("%.1f", highSum[i] / highCount[i]) end
	for i=1, 12 do args[months[i] .. ' avg record low F'] = string.format("%.1f", lowSum[i] / lowCount[i]) end		for i=1, 12 do args[months[i] .. ' avg record low C'] = string.format("%.1f", lowSum[i] / lowCount[i]) end
	for i=1, 12 do args[months[i] .. ' high F'] = string.format("%.1f", avgHighSum[i] / avgHighCount[i]) end		for i=1, 12 do args[months[i] .. ' high C'] = string.format("%.1f", avgHighSum[i] / avgHighCount[i]) end
	for i=1, 12 do args[months[i] .. ' low F'] = string.format("%.1f", avgLowSum[i] / avgLowCount[i]) end		for i=1, 12 do args[months[i] .. ' low C'] = string.format("%.1f", avgLowSum[i] / avgLowCount[i]) end
	for i=1, 12 do args[months[i] .. ' precipitation ~~inch~~'] = string.format("%.1f", precipSum[i] / precipCount[i]) end		for i=1, 12 do args[months[i] .. ' precipitation mm'] = string.format("%.1f", precipSum[i] / precipCount[i]) end
	for i=1, 12 do args[months[i] .. ' snow ~~inch~~'] = string.format("%.1f", snowfallSum[i] / snowfallCount[i]) end		for i=1, 12 do args[months[i] .. ' snow mm'] = string.format("%.1f", snowfallSum[i] / snowfallCount[i]) end
	for i=1, 12 do args[months[i] .. ' precipitation days'] = string.format("%.1f", precipDaysSum[i] / precipDaysCount[i]) end		for i=1, 12 do args[months[i] .. ' precipitation days'] = string.format("%.1f", precipDaysSum[i] / precipDaysCount[i]) end
	for i=1, 12 do args[months[i] .. ' snow days'] = string.format("%.1f", snowfallDaysSum[i] / snowfallDaysCount[i]) end		for i=1, 12 do args[months[i] .. ' snow days'] = string.format("%.1f", snowfallDaysSum[i] / snowfallDaysCount[i]) end

Yurik at 20:12, 14 December 2016

2016-12-14T20:12:05Z

← Previous revision		Revision as of 20:12, 14 December 2016
Line 29:		Line 29:
	for key, row in pairs(mw.ext.data.get(dataPage).data) do		for key, row in pairs(mw.ext.data.get(dataPage).data) do
	-- First column is in [0], not [1], needs special handling		-- First column is in [0], not [1], needs special handling
		⚫	local date, highTemp, avgHighTemp, avgLowTemp, lowTemp, precip, snowfall, precipDays, snowfallDays = unpack(row)
	local date = row[0]
⚫	local highTemp, avgHighTemp, avgLowTemp, lowTemp, precip, snowfall, precipDays, snowfallDays = unpack(row)

	local year, month = date:match(datePattern)		local year, month = date:match(datePattern)

Yurik: support null

2016-12-12T21:59:06Z

support null

← Previous revision		Revision as of 21:59, 12 December 2016
Line 35:		Line 35:
	month = tonumber(month)		month = tonumber(month)

	if highTemp > ~~-999~~ and (monthlyHigh[month] == nil or monthlyHigh[month] < highTemp) then monthlyHigh[month] = highTemp end		if highTemp ~= nil and (monthlyHigh[month] == nil or monthlyHigh[month] < highTemp) then monthlyHigh[month] = highTemp end
	if lowTemp > ~~-999~~ and (monthlyLow[month] == nil or monthlyLow[month] > lowTemp) then monthlyLow[month] = lowTemp end		if lowTemp ~= nil and (monthlyLow[month] == nil or monthlyLow[month] > lowTemp) then monthlyLow[month] = lowTemp end
	recordAvg(highSum, highCount, month, highTemp)		recordAvg(highSum, highCount, month, highTemp)
	recordAvg(lowSum, lowCount, month, lowTemp)		recordAvg(lowSum, lowCount, month, lowTemp)
Line 63:		Line 63:

	function recordAvg(sumTbl, countTbl, month, value)		function recordAvg(sumTbl, countTbl, month, value)
	if value > ~~-999~~ then		if value ~= nil then
	sumTbl[month] = (sumTbl[month] or 0) + value		sumTbl[month] = (sumTbl[month] or 0) + value
	countTbl[month] = (countTbl[month] or 0) + 1		countTbl[month] = (countTbl[month] or 0) + 1

Yurik at 01:50, 11 December 2016

2016-12-11T01:50:52Z

← Previous revision		Revision as of 01:50, 11 December 2016
Line 1:		Line 1:
	local p = {}		local p = {}
	local getArgs = require('Module:Arguments').getArgs		local getArgs = require('Module:Arguments').getArgs
	local datePattern = "^~~(%d+)-~~(%d+)-(%d+)$"		local datePattern = "^(%d+)-(%d+)$"
	local weatherTemplate = 'Template:Weather box'		local weatherTemplate = 'Template:Weather box'
	local wrapsTemplate = 'User:Yurik/Weather box'		local wrapsTemplate = 'User:Yurik/Weather box'
Line 32:		Line 32:
	local highTemp, avgHighTemp, avgLowTemp, lowTemp, precip, snowfall, precipDays, snowfallDays = unpack(row)		local highTemp, avgHighTemp, avgLowTemp, lowTemp, precip, snowfall, precipDays, snowfallDays = unpack(row)

	local year, month~~, day~~ = date:match(datePattern)		local year, month = date:match(datePattern)
	month = tonumber(month)		month = tonumber(month)

Yurik at 23:10, 9 December 2016

2016-12-09T23:10:24Z

← Previous revision		Revision as of 23:10, 9 December 2016
Line 19:		Line 19:
	local precipDaysSum, precipDaysCount = {}, {}		local precipDaysSum, precipDaysCount = {}, {}
	local snowfallDaysSum, snowfallDaysCount = {}, {}		local snowfallDaysSum, snowfallDaysCount = {}, {}

			-- There is currently no established way to specify sources, suggestions needed
			-- For now, prepend the link to edit box to the first source
			local source = args['source'] or args['source 1']
			if source then source = '<br>' .. source end
			args['source'] = '[[commons:Data:'.. dataPage ..'\|edit data]]' .. source
			args['source 1'] = nil

	for key, row in pairs(mw.ext.data.get(dataPage).data) do		for key, row in pairs(mw.ext.data.get(dataPage).data) do

Yurik at 22:44, 9 December 2016

2016-12-09T22:44:28Z

← Previous revision		Revision as of 22:44, 9 December 2016
Line 13:		Line 13:
	local highSum, highCount = {}, {}		local highSum, highCount = {}, {}
	local lowSum, lowCount = {}, {}		local lowSum, lowCount = {}, {}
	local ~~percipSum~~, ~~percipCount~~ = {}, {}		local avgHighSum, avgHighCount = {}, {}
			local avgLowSum, avgLowCount = {}, {}
			local precipSum, precipCount = {}, {}
			local snowfallSum, snowfallCount = {}, {}
			local precipDaysSum, precipDaysCount = {}, {}
			local snowfallDaysSum, snowfallDaysCount = {}, {}

	for key, row in pairs(mw.ext.data.get(dataPage).data) do		for key, row in pairs(mw.ext.data.get(dataPage).data) do
	-- First column is in [0], not [1], needs special handling		-- First column is in [0], not [1], needs special handling
	local date = row[0]		local date = row[0]
	local ~~percip~~, ~~tempLow~~, ~~tempAvg~~, ~~tempHigh~~ = unpack(row)		local highTemp, avgHighTemp, avgLowTemp, lowTemp, precip, snowfall, precipDays, snowfallDays = unpack(row)

	local year, month, day = date:match(datePattern)		local year, month, day = date:match(datePattern)
	month = tonumber(month)		month = tonumber(month)

⚫	if ~~tempHigh~~ > -999 and (~~monthlyHigh~~[month] == nil or ~~monthlyHigh~~[month] < ~~tempHigh~~) then ~~monthlyHigh~~[month] = ~~tempHigh~~ end
	if ~~tempLow~~ > -999 and (~~monthlyLow~~[month] == nil or ~~monthlyLow~~[month] > ~~tempLow~~) then ~~monthlyLow~~[month] = ~~tempLow~~ end		if highTemp > -999 and (monthlyHigh[month] == nil or monthlyHigh[month] < highTemp) then monthlyHigh[month] = highTemp end
		⚫	if lowTemp > -999 and (monthlyLow[month] == nil or monthlyLow[month] > lowTemp) then monthlyLow[month] = lowTemp end
⚫	recordAvg(~~percipSum~~, ~~percipCount~~, month, ~~percip~~)
	recordAvg(highSum, highCount, month, ~~tempHigh~~)		recordAvg(highSum, highCount, month, highTemp)
	recordAvg(lowSum, lowCount, month, ~~tempLow~~)		recordAvg(lowSum, lowCount, month, lowTemp)
			recordAvg(avgHighSum, avgHighCount, month, avgHighTemp)
			recordAvg(avgLowSum, avgLowCount, month, avgLowTemp)
		⚫	recordAvg(precipSum, precipCount, month, precip)
			recordAvg(snowfallSum, snowfallCount, month, snowfall)
			recordAvg(precipDaysSum, precipDaysCount, month, precipDays)
			recordAvg(snowfallDaysSum, snowfallDaysCount, month, snowfallDays)
	end		end

Line 34:		Line 45:
	for i=1, 12 do args[months[i] .. ' avg record high F'] = string.format("%.1f", highSum[i] / highCount[i]) end		for i=1, 12 do args[months[i] .. ' avg record high F'] = string.format("%.1f", highSum[i] / highCount[i]) end
	for i=1, 12 do args[months[i] .. ' avg record low F'] = string.format("%.1f", lowSum[i] / lowCount[i]) end		for i=1, 12 do args[months[i] .. ' avg record low F'] = string.format("%.1f", lowSum[i] / lowCount[i]) end
	for i=1, 12 do args[months[i] .. ' ~~precipitation~~ ~~inch~~'] = string.format("%.1f", ~~percipSum~~[i] / ~~percipCount~~[i]) end		for i=1, 12 do args[months[i] .. ' high F'] = string.format("%.1f", avgHighSum[i] / avgHighCount[i]) end
			for i=1, 12 do args[months[i] .. ' low F'] = string.format("%.1f", avgLowSum[i] / avgLowCount[i]) end
			for i=1, 12 do args[months[i] .. ' precipitation inch'] = string.format("%.1f", precipSum[i] / precipCount[i]) end
			for i=1, 12 do args[months[i] .. ' snow inch'] = string.format("%.1f", snowfallSum[i] / snowfallCount[i]) end
			for i=1, 12 do args[months[i] .. ' precipitation days'] = string.format("%.1f", precipDaysSum[i] / precipDaysCount[i]) end
			for i=1, 12 do args[months[i] .. ' snow days'] = string.format("%.1f", snowfallDaysSum[i] / snowfallDaysCount[i]) end

	return frame:expandTemplate{ title = weatherTemplate, args = args }		return frame:expandTemplate{ title = weatherTemplate, args = args }

Yurik at 20:44, 9 December 2016

2016-12-09T20:44:12Z

← Previous revision		Revision as of 20:44, 9 December 2016
Line 6:		Line 6:

	function p.weatherbox( frame )		function p.weatherbox( frame )
	local args = getArgs(frame, { wrappers = wrapsTemplate })		local args = getArgs(frame, { wrappers = wrapsTemplate })
	local dataPage = assert(args.data, 'Missing "data" parameter')		local dataPage = assert(args.data, 'Missing "data" parameter')
	args.data = nil		args.data = nil

	local monthlyHigh = {}		local monthlyHigh, monthlyLow = {}, {}
	local ~~monthlyLow~~ = {}		local highSum, highCount = {}, {}
	local ~~percipSum~~ = {0,~~0,0,0,0,0,0,0,0,0,0,0~~}		local lowSum, lowCount = {}, {}
	local percipCount = {0,~~0,0,0,0,0,0,0,0,0,0,0~~}		local percipSum, percipCount = {}, {}

	for key, row in pairs(mw.ext.data.get(dataPage).data) do		for key, row in pairs(mw.ext.data.get(dataPage).data) do
	-- First column is in [0], not [1], needs special handling		-- First column is in [0], not [1], needs special handling
	local date = row[0]		local date = row[0]
	local percip, tempLow, tempAvg, tempHigh = unpack(row)		local percip, tempLow, tempAvg, tempHigh = unpack(row)

	local year, month, day = date:match(datePattern)		local year, month, day = date:match(datePattern)
	month = tonumber(month)		month = tonumber(month)
	if tempHigh > -99 and (monthlyHigh[month] == nil or monthlyHigh[month] < tempHigh) then monthlyHigh[month] = tempHigh end		if tempHigh > -999 and (monthlyHigh[month] == nil or monthlyHigh[month] < tempHigh) then monthlyHigh[month] = tempHigh end
	if tempLow > -99 and (monthlyLow[month] == nil or monthlyLow[month] > tempLow) then monthlyLow[month] = tempLow end		if tempLow > -999 and (monthlyLow[month] == nil or monthlyLow[month] > tempLow) then monthlyLow[month] = tempLow end
			recordAvg(percipSum, percipCount, month, percip)
	if percip > -99 then
			recordAvg(highSum, highCount, month, tempHigh)
	percipSum[month] = percipSum[month] + percip
			recordAvg(lowSum, lowCount, month, tempLow)
	percipCount[month] = percipCount[month] + 1
	end		end
	end

	local months = {'Jan','Feb','Mar','Apr','May','Jun','Jul','Aug','Sep','Oct','Nov','Dec'}		local months = {'Jan','Feb','Mar','Apr','May','Jun','Jul','Aug','Sep','Oct','Nov','Dec'}
	for i=1, 12 do args[months[i] .. ' record high F'] = monthlyHigh[i] end		for i=1, 12 do args[months[i] .. ' record high F'] = monthlyHigh[i] end
	for i=1, 12 do args[months[i] .. ' record low F'] = monthlyLow[i] end		for i=1, 12 do args[months[i] .. ' record low F'] = monthlyLow[i] end
	for i=1, 12 do args[months[i] .. ' ~~precipitation~~ ~~inch~~'] = string.format("%.1f", ~~percipSum~~[i] / ~~percipCount~~[i]) end		for i=1, 12 do args[months[i] .. ' avg record high F'] = string.format("%.1f", highSum[i] / highCount[i]) end
			for i=1, 12 do args[months[i] .. ' avg record low F'] = string.format("%.1f", lowSum[i] / lowCount[i]) end

			for i=1, 12 do args[months[i] .. ' precipitation inch'] = string.format("%.1f", percipSum[i] / percipCount[i]) end
⚫	return frame:expandTemplate{ title = weatherTemplate, args = args }
	end

		⚫	return frame:expandTemplate{ title = weatherTemplate, args = args }
	function p.dbg( frame )
	return mw.text.jsonEncode( p._impl('Weather/New York City.tab') )
	end		end

	function ~~highest~~(~~tbl~~, ~~comparator~~)		function recordAvg(sumTbl, countTbl, month, value)
	if ~~#tbl~~ == 0 then ~~return nil end~~		if value > -999 then
			sumTbl[month] = (sumTbl[month] or 0) + value
	local value = tbl[1]
			countTbl[month] = (countTbl[month] or 0) + 1
	for i = 2, #tbl do
	if comparator(value, tbl[i]) then
	value = tbl[i]
	end
	end		end
	return value
	end		end