Saturday, December 21, 2013
Thomas Gresham will 1876
Saturday, September 21, 2013
Tuesday, September 17, 2013
Friday, September 13, 2013
Thursday, September 12, 2013
Wednesday, September 11, 2013
Sunday, September 8, 2013
Saturday, September 7, 2013
Wednesday, August 21, 2013
Friday, August 16, 2013
Thursday, August 1, 2013
Monday, July 1, 2013
Friday, June 7, 2013
Wednesday, May 29, 2013
Sunday, May 19, 2013
Wednesday, April 17, 2013
Tuesday, April 16, 2013
Sunday, April 7, 2013
Saturday, April 6, 2013
Sunday, March 31, 2013
Saturday, March 30, 2013
Monday, March 25, 2013
Saturday, March 23, 2013
Wednesday, March 20, 2013
Monday, March 18, 2013
Saturday, March 16, 2013
Friday, March 15, 2013
Thursday, March 14, 2013
Tuesday, March 12, 2013
Monday, March 11, 2013
Saturday, March 9, 2013
Friday, March 8, 2013
Wednesday, March 6, 2013
Tuesday, March 5, 2013
Monday, March 4, 2013
Thursday, February 28, 2013
Wednesday, February 27, 2013
Tuesday, February 26, 2013
Monday, February 25, 2013
Sunday, February 24, 2013
Saturday, February 23, 2013
Friday, February 22, 2013
Thursday, February 21, 2013
Wednesday, February 20, 2013
Tuesday, February 19, 2013
Sunday, February 17, 2013
Saturday, February 16, 2013
Friday, February 15, 2013
Thursday, February 14, 2013
Wednesday, February 13, 2013
Tuesday, February 12, 2013
Monday, February 11, 2013
Sunday, February 10, 2013
Saturday, February 9, 2013
Friday, February 8, 2013
Thursday, February 7, 2013
Wednesday, February 6, 2013
Monday, February 4, 2013
Sunday, February 3, 2013
Saturday, February 2, 2013
Friday, February 1, 2013
Thursday, January 31, 2013
Wednesday, January 30, 2013
Tuesday, January 29, 2013
Monday, January 28, 2013
Friday, January 25, 2013
Wednesday, January 23, 2013
Tuesday, January 22, 2013
Monday, January 21, 2013
Sunday, January 20, 2013
Monday, January 14, 2013
Real Estate Intelligence Agency
Real Estate Intelligence Agency, Inc. (REIA) is a Huntsville based Real Estate Brokerage that serves residential and commercial real estate buyers and sellers in the North Alabama area. We specialize in customizing our services for each client based on their specific needs and requirements.
Our mission is to create a modern real estate agency and move beyond legacy programs, processes and outdated business models of the traditional real estate companies. We will accomplish our mission by approaching each opportunity with a strategic planning model that looks at industry, market, and competitive environment in order to better brand the property and focus marketing efforts.
Thursday, January 10, 2013
Making Change
(%i1) load(basic)$
(%i2) powerdisp:true$
Number of terms to count down to in increments of five.
(%i3) Number_of_Terms:50;
Define coins as list of lists with coin name, denomination, and additonal format character for plurals.
(%i4) Coins:[[Quarter,25,""],[Dime,10,""],[Nickel,5,""],[Penn,1,"@"]];
Form formats for string output:
(%i5) fmts:makelist(sconcat("~d ",Coins[j][1],"~:",Coins[j][3],"P~% "),j,1,length(Coins));
Form the generating function.
(%i6) FD:1$
(%i7) for c in Coins do FD:FD/(1-c[1]*x^c[2])$
(%i8) display(FD);
(%i9) FT:taylor(FD,x,0,Number_of_Terms)$
Taylor series expansion of the generating function, e.g.,
(%i10) taylor(FD,x,0,11);
(%i11) C(n):=expand(coeff(taylor(FD,x,0,n),x,n))$
Grab the n-th coefficient, e.g.,
(%i12) display(C(10));
Create list of terms in reverse order
(%i13) terms(lst):=reverse(maplist(lambda([item],item),lst))$
(%i14) trms:terms((C(10)));
Grab the power of each Coins
(%i15) pwrs(t):=makelist(hipow(t,Coins[l][1]),l,1,length(Coins))$
(%i16) makelist(pwrs(trms[i]),i,1,length(trms));
(%i17) asum(lst):=block(sout:"",for k:1 thru length(Coins) do if lst[k]>0 then sout:sconcat(sout,printf(false,fmts[k],lst[k])),return(sout))$
(%i18) asum([1,0,2,10]);
(%i19) for j:Number_of_Terms step -5 thru Number_of_Terms do
(scoins:[],
tmp:terms(C(j)),
print("There are ",length(tmp)," ways to make change for ",j," cents, namely: "),
for i:1 thru length(tmp) do (
tmp2:pwrs(tmp[i]),
push([apply("+",tmp2),asum(tmp2)],scoins)
),
scoins:sort(scoins),
for s in scoins do print(s[2],"")
);
Created with wxMaxima.
hcard - Dave England
Friday, January 4, 2013
Shooting Dice
(%i1) powerdisp:true$
Shooting Dice and Generating Functions
A die has six sides with pips. Thus, the generating function is:
Although not explicitly written, each term has a coefficient of 1. Hence, there is only one way to shoot the numbers 1,2,3,4,5 and 6.
Craps (two dice)
The above says there is 1 way to shoot a two (snake eyes), namely 2=1+1.
There are two ways to shoot a 3 (3=1+2=2+1).
There are 3 ways to shoot a four, namely 4=1+3=2+2=3+1.
...
This shows the four ways to get a 5, namely 5=2+3=3+2=1+4=4+1
Six ways to get a seven, namely 7=3+4=4+3=2+5=5+2=1+6=6+1
...
Three dice
There is one way to shoot a 3, namely 3=1+1+1/
There are three ways to get a 4, namely 4=1+1+2=
4=1+1+2=1+2+1=2+1+1
Created with wxMaxima.