using System; using System.IO; using System.Text; using System.Linq; using System.Diagnostics; using System.Collections.Generic; using Enu = System.Linq.Enumerable; class Program { static readonly int Mod = (int)1e9 + 7; void Add(ref long a, long b) { if ((a += b) >= Mod) a -= Mod; } void Solve() { int N = reader.Int(); var C = ModC(N, Mod); var dp = new long[N + 1, N + 1]; dp[0, 0] = 1; long ans = 0; for (int pair = 1; pair <= N; pair++) for (int numGroup = 1; numGroup <= pair; numGroup++) { Add(ref dp[pair, numGroup], dp[pair - 1, numGroup - 1]); Add(ref dp[pair, numGroup], dp[pair - 1, numGroup] * numGroup % Mod); long curr = C[N, pair] * dp[pair, numGroup] % Mod; int rem = N - pair; for (int i = 0; i < rem; i++) curr = curr * numGroup * (numGroup - 1) % Mod; Add(ref ans, curr); } Console.WriteLine(ans); } static int[,] ModC(int n, int mod) { var c = new int[n + 1, n + 1]; for (int i = 0; i <= n; i++) { c[i, 0] = c[i, i] = 1; for (int j = 1; j < i; j++) c[i, j] = (c[i - 1, j] + c[i - 1, j - 1]) % mod; } return c; } static void Main() { new Program().Solve(); } Reader reader = new Reader(Console.In); class Reader { private readonly TextReader reader; private readonly char[] separator = { ' ' }; private readonly StringSplitOptions removeOp = StringSplitOptions.RemoveEmptyEntries; private string[] A = new string[0]; private int i; public Reader(TextReader r) { reader = r; } public bool HasNext() { return Enqueue(); } public string String() { return Dequeue(); } public int Int() { return int.Parse(Dequeue()); } public long Long() { return long.Parse(Dequeue()); } public double Double() { return double.Parse(Dequeue()); } public int[] IntLine() { var s = Line(); return s == "" ? new int[0] : Array.ConvertAll(Split(s), int.Parse); } public int[] IntArray(int N) { return Enu.Range(0, N).Select(i => Int()).ToArray(); } public int[][] IntGrid(int H) { return Enu.Range(0, H).Select(i => IntLine()).ToArray(); } public string[] StringArray(int N) { return Enu.Range(0, N).Select(i => Line()).ToArray(); } public string Line() { return reader.ReadLine().Trim(); } private string[] Split(string s) { return s.Split(separator, removeOp); } private bool Enqueue() { if (i < A.Length) return true; string line = reader.ReadLine(); if (line == null) return false; if (line == "") return Enqueue(); A = Split(line); i = 0; return true; } private string Dequeue() { Enqueue(); return A[i++]; } } }