# Soluzione col software R
#
source("http://macosa.dima.unige.it/r.R")
F = function(x) 1 + 32000/x
Plane(0,50*1000, 0,10)
graph(F, 0,50*1000, "brown")
# Capisco che la soluz. di F(x)=2 sta tra 10*1000 e 50*1000
solution(F,2, 10*1000, 50*1000)
# 32000