Dear all,
I calculated the entropy values for the time series of 44 cities. Is it possible to define a simple or complex network for these values? I attached a related reference for getting more information.
shannonEntropy[data_, binWidth_] :=
Module[{iter, n = Length[data], pi, pi1},
iter = {Min[data], Max[data] + binWidth, binWidth};
pi = N[BinCounts[data, iter]/n];
pi1 = DeleteCases[pi, 0.];
-pi1.Log[pi1]]
entr = {1.21`, 0.55`, 0.84`, 1.06`, 1.33`, 0.82`, 1.51`, 0.27`, 1.21`,
1.14`, 0.92`, 1.23`, 1.37`, 0.82`, 0.69`, 1.46`, 0.1`, 0.09`,
1.63`, 1.58`, 0.89`, 0.21`, 0.93`, 1.33`, 1.31`, 1.09`, 0.46`,
0.54`, 0.94`, 0.04`, 0.88`, 0.87`, 1.24`, 1.62`, 0.96`, 1.35`,
1.43`, 0.9`, 0.72`, 1.07`, 1.02`, 1.16`, 1.38`, 0.07`};
lat = {36.37`, 35.44`, 35.44`, 36.69`, 37.`, 35.75`, 36.69`, 34.81`,
36.06`, 36.69`, 35.13`, 36.37`, 36.37`, 34.81`, 33.56`, 37.`,
33.25`, 32.63`, 36.37`, 36.69`, 35.44`, 33.88`, 35.44`, 36.37`,
36.37`, 36.06`, 35.75`, 33.25`, 35.75`, 32.`, 35.73`, 35.75`,
34.81`, 36.06`, 35.13`, 37.`, 36.37`, 35.44`, 35.13`, 35.44`,
36.69`, 35.44`, 36.69`, 33.25`};
lon = {1.875`, 2.5`, -0.9375`, 3.125`, 7.8125`, 6.25`, 5.`, 5.625`,
4.6875`, 3.4375`, 4.0625`, 0.9375`, 6.5625`, 3.125`, 0.9375`,
8.125`, 6.875`, 3.75`, 7.5`, 5.625`, 7.1875`, 2.8125`, 0.3125`,
2.8125`, 6.25`, 0.`, 4.6875`, -0.3125`, -0.3125`, 5.625`, 7.3693`,
0.625`, 0.3125`, 5.3125`, -0.625`, 6.875`, 7.8125`,
7.8125`, -1.875`, 1.25`, 2.5`, 1.5625`, 3.75`, 5.9375`};
Attachments:
