Module:Factorization/sandbox - Revision history

WOSlinker: fix closing span

2020-01-12T14:38:57Z

fix closing span

← Previous revision		Revision as of 14:38, 12 January 2020
Line 68:		Line 68:
	if serif then ret = ret .. 'class="texhtml" ' end		if serif then ret = ret .. 'class="texhtml" ' end
	if big then ret = ret .. 'style="font-size:165%" ' end		if big then ret = ret .. 'style="font-size:165%" ' end
	ret = ret .. ((serif or big) and '>' or '') .. numString .. '</span>'		ret = ret .. ((serif or big) and '>' or '') .. numString .. ((serif or big) and '</span>' or '')

	return ret		return ret

Certes: Add space between power and product symbol: 2² × 5², not 2²× 5²

2019-08-30T00:03:51Z

Add space between power and product symbol: 2² × 5², not 2²× 5²

← Previous revision		Revision as of 00:03, 30 August 2019
Line 56:		Line 56:
	if power < 1 then return ''		if power < 1 then return ''
	elseif power == 1 then return divisor .. ' ' .. productSymbol .. ' '		elseif power == 1 then return divisor .. ' ' .. productSymbol .. ' '
	else return divisor .. '<sup>' .. power .. '</sup>' .. productSymbol .. ' '		else return divisor .. '<sup>' .. power .. '</sup> ' .. productSymbol .. ' '
	end		end
	end		end

Certes: sync

2019-08-30T00:03:06Z

sync

← Previous revision		Revision as of 00:03, 30 August 2019
Line 45:		Line 45:

	if currentNumber == number and primeLink then		if currentNumber == number and primeLink then
	return '[[prime]]'		return '[[prime number\|prime]]'
	end		end

Andy M. Wang: fix

2016-04-24T06:41:36Z

fix

← Previous revision		Revision as of 06:41, 24 April 2016
Line 68:		Line 68:
	if serif then ret = ret .. 'class="texhtml" ' end		if serif then ret = ret .. 'class="texhtml" ' end
	if big then ret = ret .. 'style="font-size:165%" ' end		if big then ret = ret .. 'style="font-size:165%" ' end
	ret = ret .. '>' .. numString .. '</span>'		ret = ret .. ((serif or big) and '>' or '') .. numString .. '</span>'

	return ret		return ret

Andy M. Wang: compressed format function

2016-04-24T06:40:23Z

compressed format function

← Previous revision		Revision as of 06:40, 24 April 2016
Line 34:		Line 34:
	end		end

			-- Concat result and increment divisor
			-- when divisor is 2, go to 3. All other times, add 2
	result = result .. powerformat(divisor, power, productSymbol)		result = result .. powerformat(divisor, power, productSymbol)

	divisor = divisor + (divisor == 2 and 1 or 2)		divisor = divisor + (divisor == 2 and 1 or 2)
	end		end

	if currentNumber ~= 1 then		if currentNumber ~= 1 then
	result = result..currentNumber..' '..productSymbol..' '		result = result .. currentNumber .. ' ' .. productSymbol .. ' '
	end		end

	if currentNumber == number and primeLink then		if currentNumber == number and primeLink then
	return '[[~~'..'~~prime~~'..'~~]]'		return '[[prime]]'
	end		end

Line 59:		Line 60:
	end		end

	function format(~~num~~)		function format(numString)
	if bold then		if bold then
	~~num~~ = '<b>'..~~num~~..'</b>'		numString = '<b>'..numString..'</b>'
	end		end

			ret = (serif or big) and '<span ' or ''
	if serif then
			if serif then ret = ret .. 'class="texhtml" ' end
	if big then
	~~num =~~ '~~<span class="texhtml"~~ style="font-size:165%"~~>'..num..'</span>~~'		if big then ret = ret .. 'style="font-size:165%" ' end
			ret = ret .. '>' .. numString .. '</span>'
	else
	num = '<span class="texhtml">'..num..'</span>'
	end
	elseif big then
	num = '<span style="font-size:165%">'..num..'</span>'
	end

	return ~~num~~		return ret
	end		end

Andy M. Wang: consolidating divisor with subroutine (cleaner)

2016-04-24T06:30:02Z

consolidating divisor with subroutine (cleaner)

← Previous revision		Revision as of 06:30, 24 April 2016
Line 29:		Line 29:
	while divisor <= math.sqrt(currentNumber) do		while divisor <= math.sqrt(currentNumber) do
	power = 0		power = 0

	if currentNumber % divisor == 0 then
	result = result..divisor
	currentNumber = currentNumber / divisor
	power = 1
	end

	while currentNumber % divisor == 0 do		while currentNumber % divisor == 0 do
	currentNumber = currentNumber / divisor		currentNumber = currentNumber / divisor
Line 41:		Line 34:
	end		end

	result = result .. powerformat(power, productSymbol)		result = result .. powerformat(divisor, power, productSymbol)

	divisor = divisor + (divisor == 2 and 1 or 2)		divisor = divisor + (divisor == 2 and 1 or 2)
Line 59:		Line 52:
	end		end

	function powerformat(power, productSymbol)		function powerformat(divisor, power, productSymbol)
	if power < 1 then return ''		if power < 1 then return ''
	elseif power == 1 then return ' '..productSymbol..' '		elseif power == 1 then return divisor .. ' ' .. productSymbol .. ' '
	else ~~return~~ '<sup>'..power..'</sup>'..productSymbol..' '		else return divisor .. '<sup>' .. power .. '</sup>' .. productSymbol .. ' '
	end		end
	end		end

Andy M. Wang: add'l case....

2016-04-24T06:27:49Z

add'l case....

← Previous revision		Revision as of 06:27, 24 April 2016
Line 60:		Line 60:

	function powerformat(power, productSymbol)		function powerformat(power, productSymbol)
	if ~~power~~ > 1 then		if power < 1 then return ''
	return '~~<sup>'..power..'</sup>~~'..productSymbol..' '		elseif power == 1 then return ' '..productSymbol..' '
		⚫	else return '<sup>'..power..'</sup>'..productSymbol..' '
	elseif power == 1 then
⚫	return ' '..productSymbol..' '
	end		end
	end		end

Andy M. Wang: ←Created page with 'local p = {} function p.factor(frame) -- Consider calling the parser function #expr -- to simplify a potential mathematical expression? number = tonumbe...'

2016-04-24T06:23:19Z

←Created page with 'local p = {} function p.factor(frame) -- Consider calling the parser function #expr -- to simplify a potential mathematical expression? number = tonumbe...'

New page

local p = {}

function p.factor(frame)
-- Consider calling the parser function #expr
-- to simplify a potential mathematical expression?
number = tonumber(frame.args[1])
if number == nil then
return 'Error: input not recognized as a number'
end

productSymbol = frame.args['product'] or '·'
bold = frame.args['bold'] and true
big = frame.args['big'] and true
serif = frame.args['serif'] and true
primeLink = frame.args['prime'] and true

number = math.floor(number)
if number < 2 or number > 1000000000 or number == math.huge then
return 'Error: ' .. number .. ' out of range'
end

result = ""
currentNumber = number
power = 0
divisor = 2

-- Attempt factoring by the value of the divisor
-- divisor increments by 2, except first iteration (2 to 3)
while divisor <= math.sqrt(currentNumber) do
power = 0

if currentNumber % divisor == 0 then
result = result..divisor
currentNumber = currentNumber / divisor
power = 1
end

while currentNumber % divisor == 0 do
currentNumber = currentNumber / divisor
power = power + 1
end

result = result .. powerformat(power, productSymbol)

divisor = divisor + (divisor == 2 and 1 or 2)
end

if currentNumber ~= 1 then
result = result..currentNumber..' '..productSymbol..' '
end

if currentNumber == number and primeLink then
return '[['..'prime'..']]'
end

result = string.sub(result,1,-4)

return format(result)
end

function powerformat(power, productSymbol)
if power > 1 then
return ''..power..''..productSymbol..' '
elseif power == 1 then
return ' '..productSymbol..' '
end
end

function format(num)
if bold then
num = ''..num..''
end

if serif then
if big then
num = ''..num..''
else
num = ''..num..''
end
elseif big then
num = ''..num..''
end

return num
end

return p