#include<bits/stdc++.h>
#define maxN 5005
#define INF 10000
using namespace std;
int n,v[maxN],x,best,maxim,pr[maxN],da,minim,l;
int s,ld,mid,sol,ls,a[maxN],sol1;
short d[maxN][maxN],poz[maxN][maxN];
ifstream fin("secv.in");
ofstream fout("secv.out");
inline int min(int a,int b)
{
    return a<b?a:b;
}
inline int max(int a,int b)
{
    return a>b?a:b;
}
int main()
{
   // freopen("secv.in","r",stdin);
  //  freopen("secv.out","w",stdout);
  //  scanf("%d",&n);
  fin>>n;
    for(int i=1;i<=n;i++)
    {
    //    scanf("%d",&v[i]);
    fin>>v[i];
    ls=1;
    ld=da;
    sol=0;
    while (ls<=ld)
           {
                mid=(ls+ld)>>1;
                if (a[mid]==v[i])
                {
                    sol=mid;
                    ls=ld+1;
                }
                    else
                if (a[mid]>v[i])
                {
                    ld=mid-1;
                }
                    else
                    {
                        sol1=mid;
                        ls=mid+1;
                    }
           }
        if (!sol)
        {
            da++;
            for(int i=da;i>=(sol1+2);i--)
            {
                a[i]=a[i-1];
            }
            a[sol1+1]=v[i];
        }
    }
    sort(a+1,a+da+1);
    for(int j=1;j<=n;j++)
    {
        ls=1;
        ld=da;
        sol=0;
        while(ls<=ld)
        {
            mid=(ls+ld)>>1;
            if (a[mid]==v[j])
            {
                sol=mid;
                ls=ld+1;
            }
                else
            if (a[mid]>v[j])
            {
                ld=mid-1;
            }
                else ls=mid+1;
        }
        pr[j]=sol;
    }
    if (v[1]==a[1])
    {
        d[1][1]=1;
        poz[1][1]=1;
    }
    for(int i=2;i<=n;i++)
    {
        if (v[i]==a[1])
        {
            d[i][1]=1;
            poz[i][1]=i;
        }
            else
        {
            x=pr[i]-1;
            minim=INF;
            for(int j=1;j<i;j++)
            {
                if (d[j][x])
                {
                    l=d[j][x]+(i-poz[j][x]);
                    minim=min(minim,l);
                }
            }
            if (minim==INF) d[i][pr[i]]=0;
                else
            {
                d[i][pr[i]]=minim;
                poz[i][pr[i]]=i;
            }
        }
    }
    best=INF;
    for(int i=1;i<=n;i++)
    {
       if (d[i][da]) best=min(best,d[i][da]);
    }
    if (best!=INF) fout<<best<<'\n';
        else fout<<-1<<'\n';

    return 0;
}