#include <bits/stdc++.h>

#define pii              pair <int,int>
#define pll              pair <long long,long long>
#define sc               scanf
#define pf               printf
#define Pi               2*acos(0.0)
#define ms(a,b)          memset(a, b, sizeof(a))
#define pb(a)            push_back(a)
#define MP               make_pair
#define db               double
#define ll               long long
#define EPS              10E-10
#define ff               first
#define ss               second
#define sqr(x)           (x)*(x)
#define D(x)             cout<<#x " = "<<(x)<<endl
#define VI               vector <int>
#define DBG              pf("Hi\n")
#define MOD              1000000007
#define CIN              ios_base::sync_with_stdio(0); cin.tie(0); cout.tie(0)
#define SZ(a)            (int)a.size()
#define pf                  printf
#define sf(a)               scanf("%d",&a)
#define sfl(a)              scanf("%lld",&a)
#define sff(a,b)            scanf("%d %d",&a,&b)
#define sffl(a,b)           scanf("%lld %lld",&a,&b)
#define sfff(a,b,c)         scanf("%d %d %d",&a,&b,&c)
#define sfffl(a,b,c)        scanf("%lld %lld %lld",&a,&b,&c)
#define sffff(a,b,c,d)      scanf("%d %d %d %d",&a,&b,&c,&d)
#define sffffl(a,b,c,d)     scanf("%lld %lld %lld %lld",&a,&b,&c,&d)
#define sfffff(a,b,c,d,e)   scanf("%d %d %d %d %d",&a,&b,&c,&d,&e)
#define sfffffl(a,b,c,d,e)  scanf("%lld %lld %lld %lld %lld",&a,&b,&c,&d,&e)
#define sfc(a)              scanf("%c",&a)
#define stlloop(v)       for(__typeof(v.begin()) it=v.begin();it!=v.end();it++)
#define loop(i,n)        for(int i=0;i<n;i++)
#define loop1(i,n)       for(int i=1;i<=n;i++)
#define REP(i,a,b)       for(int i=a;i<b;i++)
#define RREP(i,a,b)      for(int i=a;i>=b;i--)
#define TEST_CASE(t)     for(int z=1;z<=t;z++)
#define PRINT_CASE       printf("Case %d:\n",z)
#define CASE_PRINT       cout<<"Case "<<z<<": "
#define all(a)           a.begin(),a.end()
#define intlim           2147483648
#define infinity         (1<<28)
#define ull              unsigned long long
#define gcd(a, b)        __gcd(a, b)
#define lcm(a, b)        ((a)*((b)/gcd(a,b)))

using namespace std;


/*----------------------Graph Moves----------------*/
//const int fx[]={+1,-1,+0,+0};
//const int fy[]={+0,+0,+1,-1};
//const int fx[]={+0,+0,+1,-1,-1,+1,-1,+1};   // Kings Move
//const int fy[]={-1,+1,+0,+0,+1,+1,-1,-1};  // Kings Move
//const int fx[]={-2, -2, -1, -1,  1,  1,  2,  2};  // Knights Move
//const int fy[]={-1,  1, -2,  2, -2,  2, -1,  1}; // Knights Move
/*------------------------------------------------*/

/*-----------------------Bitmask------------------*/
//int Set(int N,int pos){return N=N  (1<<pos);}
//int reset(int N,int pos){return N= N & ~(1<<pos);}
//bool check(int N,int pos){return (bool)(N & (1<<pos));}
/*------------------------------------------------*/
 map<int,int>mp,d;
  int n;
    string s;
    ll dp[30][30];
    ll mod=1e9+7;
    int pp;
ll yo(int p,int r)
{
    //cout<<p<<"   "<<r<<endl;
    if(r==1)
    {
        return mp[p];
    }
    if(p>pp)
    {
        return 0;
    }
    ll x=0;
    if(dp[p][r]!=-1)
    {
        return dp[p][r];
    }

    for(int i=p+1;i<=pp+1;i++)
    {
        x= (x+(mp[p]*yo(i,r-1))%mod)%mod;
       // cout<<mp[p]<<"    "<<yo(i,r-1)<<"    "<<i<<"  uuuuu  "<<r<<"   "<<p<<endl;
    }
    //ll xx=yo(p+1,r)%mod;
    dp[p][r]=x;
    return dp[p][r];
}
int main()
{

    cin>>n;
    cin>>s;
map<char,int>m;
int p=0;

    for(int i=0;i<n;i++)
    {
        if(m[s[i]]==0)
        {
            m[s[i]]=++p;
        }
        mp[m[s[i]]]++;
    }
    pp=p;
    ms(dp,-1);
    ll ans=s.size();
    for(int i=2;i<=p;i++)
    {
        //
        ans%=mod;
for(int j=1;j<=pp;j++)
{
     ll x=yo(j,i)%mod;
      ans=(ans+x)%mod;
    //  cout<<j<<"   "<<"   "<<i<<"   "<<x<<endl;
}

//cout<<i<<"   "<<x<<endl;



    }
    cout<<ans<<endl;
}


Measured memory_bytes: 512