;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ; example from "Artificial Intelligence: a modern approach" by Russell ; and Norvig ; ; goal predicate: Will Stuart Russell wait for a table at a restaurant? ; (define restaurant-names '(alternate bar fri hungry patrons price rain reservation type wait-estimate)) (define restaurant-data '((yes (yes no no yes some $$$ no yes french upto10)) (no (yes no no yes full $ no no thai upto60)) (yes (no yes no no some $ no no burger upto10)) (yes (yes no yes yes full $ no no thai upto30)) (no (yes no yes no full $$$ no yes french above60)) (yes (no yes no yes some $$ yes yes italian upto10)) (no (no yes no no none $ yes no burger upto10)) (yes (no no no yes some $$ yes yes thai upto10)) (no (no yes yes no full $ yes no burger above60)) (no (yes yes yes yes full $$$ no yes italian upto30)) (no (no no no no none $ no no thai upto10)) (yes (yes yes yes yes full $ no no burger upto60)))) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ; some data sets I made up (define snorkel-names '(tide skies waves time)) (define snorkel-data '((Yes (Low Cloudy Large Afternoon)) (Yes (Low Sunny Medium Morning)) (No (Low Sunny Large Afternoon)) (Yes (Low Cloudy Small Afternoon)) (No (Low Sunny Medium Morning)) (No (High Sunny Large Afternoon)) (Yes (High Cloudy Large Afternoon)) (Yes (High Sunny Small Morning)) (Yes (High Sunny Medium Morning)) (Yes (High Cloudy Medium Afternoon)) (No (High Sunny Small Afternoon)) (Yes (High Sunny Small Morning)))) (define loan-names '(House Bills Income Credit)) (define loan-data '((No (Rent Late Low Bad)) (No (Rent Late Low Good)) (No (Rent Late High Bad)) (No (Rent On-time Medium Good)) (Yes (Rent On-time Medium Good)) (Yes (Own Late Low Bad)) (Yes (Own Late Low Good)) (No (Own Late Medium Bad)) (No (Own Late High Good)) (Yes (Own On-time Medium Good)) (No (Own On-time High Good)) (No (Own On-time High Good))))