Add sine operation (42c0749) - computation_practice

main.lua

@@ -23,10 +23,18 @@ local TYPES = {
         -- check quality of guess g for problem p
         score = function(p, g) return -(math.log(math.abs(math.log(p) - g), 10) + 1.5)^3 end,
     },
+    sin = {
+        gen = function()
+            return 1.5 * math.random()
+        end,
+        disp = "sin(%.3f)",
+        func = math.sin,
+        score = function(p, g) return -(math.log(math.abs(math.sin(p) - g), 10) + 1.5)^3 end
+    },
 }
 
 -- ideally, configure these parameters with options/inputs
-local TYPE = TYPES.ln
+local TYPE = TYPES.sin
 local TIME = 30
 
 local ts = 0


...	...	@@ -23,10 +23,18 @@ local TYPES = {
23	23	-- check quality of guess g for problem p
24	24	score = function(p, g) return -(math.log(math.abs(math.log(p) - g), 10) + 1.5)^3 end,
25	25	},
	26	+ sin = {
	27	+ gen = function()
	28	+ return 1.5 * math.random()
	29	+ end,
	30	+ disp = "sin(%.3f)",
	31	+ func = math.sin,
	32	+ score = function(p, g) return -(math.log(math.abs(math.sin(p) - g), 10) + 1.5)^3 end
	33	+ },
26	34	}
27	35
28	36	-- ideally, configure these parameters with options/inputs
29		-local TYPE = TYPES.ln
	37	+local TYPE = TYPES.sin
30	38	local TIME = 30
31	39
32	40	local ts = 0
33	41