#!/usr/bin/env python
# coding: utf-8

# In[1]:


get_ipython().run_line_magic('matplotlib', 'inline')
import math,sys,os,numpy as np
from numpy.linalg import norm
from PIL import Image
from matplotlib import pyplot as plt, rcParams, rc
from scipy.ndimage import imread
from skimage.measure import block_reduce
import cPickle as pickle
from scipy.ndimage.filters import correlate, convolve
from ipywidgets import interact, interactive, fixed
from ipywidgets.widgets import *
rc('animation', html='html5')
rcParams['figure.figsize'] = 3, 6
get_ipython().run_line_magic('precision', '4')
np.set_printoptions(precision=4, linewidth=100)


# In[2]:


"""
from tensorflow.examples.tutorials.mnist import input_data
mnist = input_data.read_data_sets("MNIST_data/")
images, labels = mnist.train.images, mnist.train.labels
images = images.reshape((55000,28,28))
np.savez_compressed("MNIST_data/train", images=images, labels=labels)
"""
1


# In[2]:


def plots(ims, interp=False, titles=None):
    ims=np.array(ims)
    mn,mx=ims.min(),ims.max()
    f = plt.figure(figsize=(12,24))
    for i in range(len(ims)):
        sp=f.add_subplot(1, len(ims), i+1)
        if not titles is None: sp.set_title(titles[i], fontsize=18)
        plt.imshow(ims[i], interpolation=None if interp else 'none', vmin=mn,vmax=mx)

def plot(im, interp=False):
    f = plt.figure(figsize=(3,6), frameon=True)
    plt.imshow(im, interpolation=None if interp else 'none')

plt.gray()
plt.close()


# In[3]:


data = np.load("MNIST_data/train.npz")
images=data['images']
labels=data['labels']
n=len(images)
images.shape


# In[4]:


plot(images[0])


# In[5]:


labels[0]


# In[6]:


plots(images[:5], titles=labels[:5])


# In[7]:


top=[[-1,-1,-1],
     [ 1, 1, 1],
     [ 0, 0, 0]]

plot(top)


# In[8]:


r=(0,28)
def zoomim(x1=0,x2=28,y1=0,y2=28):
    plot(images[0,y1:y2,x1:x2])
w=interactive(zoomim, x1=r,x2=r,y1=r,y2=r)
w


# In[12]:


k=w.kwargs
dims = np.index_exp[k['y1']:k['y2']:1,k['x1']:k['x2']]
images[0][dims]


# In[13]:


corrtop = correlate(images[0], top)


# In[14]:


corrtop[dims]


# In[15]:


plot(corrtop[dims])


# In[16]:


plot(corrtop)


# In[17]:


np.rot90(top, 1)


# In[19]:


convtop = convolve(images[0], np.rot90(top,2))
plot(convtop)
np.allclose(convtop, corrtop)


# In[18]:


straights=[np.rot90(top,i) for i in range(4)]
plots(straights)


# In[20]:


br=[[ 0, 0, 1],
    [ 0, 1,-1.5],
    [ 1,-1.5, 0]]

diags = [np.rot90(br,i) for i in range(4)]
plots(diags)


# In[21]:


rots = straights + diags
corrs = [correlate(images[0], rot) for rot in rots]
plots(corrs)


# In[22]:


def pool(im): return block_reduce(im, (7,7), np.max)

plots([pool(im) for im in corrs])


# In[23]:


eights=[images[i] for i in xrange(n) if labels[i]==8]
ones=[images[i] for i in xrange(n) if labels[i]==1]


# In[24]:


plots(eights[:5])
plots(ones[:5])


# In[25]:


pool8 = [np.array([pool(correlate(im, rot)) for im in eights]) for rot in rots]


# In[ ]:


len(pool8), pool8[0].shape


# In[26]:


plots(pool8[0][0:5])


# In[27]:


def normalize(arr): return (arr-arr.mean())/arr.std()


# In[28]:


filts8 = np.array([ims.mean(axis=0) for ims in pool8])
filts8 = normalize(filts8)


# In[29]:


plots(filts8)


# In[30]:


pool1 = [np.array([pool(correlate(im, rot)) for im in ones]) for rot in rots]
filts1 = np.array([ims.mean(axis=0) for ims in pool1])
filts1 = normalize(filts1)


# In[31]:


plots(filts1)


# In[32]:


def pool_corr(im): return np.array([pool(correlate(im, rot)) for rot in rots])


# In[33]:


plots(pool_corr(eights[0]))


# In[35]:


def sse(a,b): return ((a-b)**2).sum()
def is8_n2(im): return 1 if sse(pool_corr(im),filts1) > sse(pool_corr(im),filts8) else 0


# In[36]:


sse(pool_corr(eights[0]), filts8), sse(pool_corr(eights[0]), filts1)


# In[37]:


[np.array([is8_n2(im) for im in ims]).sum() for ims in [eights,ones]]


# In[38]:


[np.array([(1-is8_n2(im)) for im in ims]).sum() for ims in [eights,ones]]


# In[ ]:


def n1(a,b): return (np.fabs(a-b)).sum()
def is8_n1(im): return 1 if n1(pool_corr(im),filts1) > n1(pool_corr(im),filts8) else 0


# In[ ]:


[np.array([is8_n1(im) for im in ims]).sum() for ims in [eights,ones]]


# In[ ]:


[np.array([(1-is8_n1(im)) for im in ims]).sum() for ims in [eights,ones]]


# In[ ]: