Порахуйте збалансовані двійкові рядки, що відповідають будь-якому з наборів масок


10

Двійкова рядок є рядком , яка містить тільки символи , взяті з 01 . Збалансований двоичная рядок є двійковій рядком , яка містить рівно стільки 0 сек , як 1 с.

Вам надається додатне ціле число n та довільна кількість масок, кожна з яких має 2n символів, і містить лише символи, намальовані з 012 . Двійковий рядок і маска збігаються, якщо вони однакової довжини і узгоджуються з символом у кожному положенні, де у маски немає 2 . Наприклад, маска 011022 відповідає бінарним рядкам 011000 , 011001 , 011010 , 011011 .

Враховуючи n та маски як вхідні дані (розділені новими рядками), ви повинні вивести кількість чітко врівноважених двійкових рядків, які відповідають одній або більше масок.

Приклади

Вхідні дані

3
111222
000112
122020
122210
102120

Обґрунтування

  • Єдиний збалансований двійковий рядок, що відповідає 111222, - це 111000 .
  • Єдиний збалансований двійковий рядок, що відповідає 000112, - 000111 .
  • Збалансовані двійкові рядки, що відповідають 122020, складають 111000 (уже підраховано), 110010 та 101010 .
  • Збалансовані двійкові рядки, що відповідають 122210, - це 110010 (уже підраховано), 101010 (уже підраховано) та 100110 .
  • Збалансовані виконавчі рядки , відповідні 102120 є 101100 і 100110 (вже підраховано).

Тож вихід повинен бути

6

Вхідні дані

10
22222222222222222222

Обґрунтування

  • Є 20 вибрати 10 збалансованих двійкових рядків довжиною 20.

Вихідні дані

184756

Переможець

Виграє той, хто обчислює вступ змагань найшвидше, звичайно трактуючи його так само, як і будь-який інший внесок. (Я використовую визначений код для того, щоб мати чіткого переможця та уникати випадків, коли різні входи давали б різні переможці. Якщо ви думаєте про кращий спосіб знайти найшвидший код, скажіть мені це).

Вклад конкуренції

http://pastebin.com/2Dg7gbfV


2
Крім того, я особисто віддаю перевагу gist.github.com над пастбіном , як для естетики, так і для майбутніх помилок.
orlp

3
@AlbertMasclans Я думаю, ви повинні залишити за собою право змінити дані. Інакше хтось може жорстко кодувати вихід.
mbomb007

1
Було б корисно, якщо ви зможете опублікувати невеликий приклад у запитанні із очікуваним результатом та поясненням. Я можу бути просто повільним, але я не дуже розумію це визначення. Отже, для прикладу, оскільки n = 30, ми шукаємо послідовності з 30 0s або 30 1s (при цьому 2 є підстановкою) в будь-якому ряду? Чи можуть ці послідовності перетинатися? Наприклад, якщо я знаходжу послідовність 32 1s, чи вважається це як 3 послідовності, або як одна послідовність? Що робити, якщо я знайду послідовність 60 1s (весь ряд)? Це 1 послідовність, 2 послідовності чи 31 послідовність?
Рето Кораді

3
Отже, ви запитуєте кількість унікальних масивів у цій матриці, які мають однакові числа 1s та 0s, правда?
ASCIIThenANSI

1
Чи можемо ми мати ще деякі дані тесту?
Олександр-Бретт

Відповіді:


2

С

Якщо ви не користуєтесь Linux, або у вас виникли проблеми зі складанням, вам, мабуть, слід видалити код часу ( clock_gettime).

#include <stdio.h>
#include <stdlib.h>
#include <time.h>

long int binomial(int n, int m) {
  if(m > n/2) {
    m = n - m;
  }
  int i;
  long int result = 1;
  for(i = 0; i < m; i++) {
    result *= n - i;
    result /= i + 1;
  }
  return result;
}

typedef struct isct {
  char *mask;
  int p_len;
  int *p;
} isct;

long int mask_intersect(char *mask1, char *mask2, char *mask_dest, int n) {

  int zero_count = 0;
  int any_count = 0;
  int i;
  for(i = 0; i < n; i++) {
    if(mask1[i] == '2') {
      mask_dest[i] = mask2[i];
    } else if (mask2[i] == '2') {
      mask_dest[i] = mask1[i];
    } else if (mask1[i] == mask2[i]) {
      mask_dest[i] = mask1[i];
    } else {
      return 0;
    }
    if(mask_dest[i] == '2') {
      any_count++;
    } else if (mask_dest[i] == '0') {
      zero_count++;
    }
  }
  if(zero_count > n/2 || any_count + zero_count < n/2) {
    return 0;
  }
  return binomial(any_count, n/2 - zero_count);
}

int main() {

  struct timespec start, end;
  clock_gettime(CLOCK_PROCESS_CPUTIME_ID, &start);

  int n;
  scanf("%d", &n);
  int nn = 2 * n;

  int m = 0;
  int m_max = 1024;

  char **masks = malloc(m_max * sizeof(char *));

  while(1) {
    masks[m] = malloc(nn + 1);
    if (scanf("%s", masks[m]) == EOF) {
      break;
    }
    m++;
    if (m == m_max) {
      m_max *= 2;
      masks = realloc(masks, m_max * sizeof(char *));
    }
  }

  int i = 1;
  int i_max = 1024 * 128;

  isct *iscts = malloc(i_max * sizeof(isct));

  iscts[0].mask = malloc(nn);
  iscts[0].p = malloc(m * sizeof(int));

  int j;
  for(j = 0; j < nn; j++) {
    iscts[0].mask[j] = '2';
  }
  for(j = 0; j < m; j++) {
    iscts[0].p[j] = j;
  }
  iscts[0].p_len = m;

  int i_start = 0;
  int i_end = 1;
  int sign = 1;

  long int total = 0;

  int mask_bin_len = 1024 * 1024;
  char* mask_bin = malloc(mask_bin_len);
  int mask_bin_count = 0;

  int p_bin_len = 1024 * 128;
  int* p_bin = malloc(p_bin_len * sizeof(int));
  int p_bin_count = 0;


  while (i_end > i_start) {
    for (j = i_start; j < i_end; j++) {
      if (i + iscts[j].p_len > i_max) {
        i_max *= 2;
        iscts = realloc(iscts, i_max * sizeof(isct));
      }
      isct *isct_orig = iscts + j;
      int x;
      int x_len = 0;
      int i0 = i;
      for (x = 0; x < isct_orig->p_len; x++) {
        if(mask_bin_count + nn > mask_bin_len) {
          mask_bin_len *= 2;
          mask_bin = malloc(mask_bin_len);
          mask_bin_count = 0;
        }
        iscts[i].mask = mask_bin + mask_bin_count;
        mask_bin_count += nn;
        long int count =
            mask_intersect(isct_orig->mask, masks[isct_orig->p[x]], iscts[i].mask, nn);
        if (count > 0) {
          isct_orig->p[x_len] = isct_orig->p[x];
          i++;
          x_len++;
          total += sign * count;
        }
      }
      for (x = 0; x < x_len; x++) {
        int p_len = x_len - x - 1;
        iscts[i0 + x].p_len = p_len;
        if(p_bin_count + p_len > p_bin_len) {
          p_bin_len *= 2;
          p_bin = malloc(p_bin_len * sizeof(int));
          p_bin_count = 0;
        }
        iscts[i0 + x].p = p_bin + p_bin_count;
        p_bin_count += p_len;
        int y;
        for (y = 0; y < p_len; y++) {
          iscts[i0 + x].p[y] = isct_orig->p[x + y + 1];
        }
      }
    }

    sign *= -1;
    i_start = i_end;
    i_end = i;

  }

  printf("%lld\n", total);

  clock_gettime(CLOCK_PROCESS_CPUTIME_ID, &end);

  int seconds = end.tv_sec - start.tv_sec;
  long nanoseconds = end.tv_nsec - start.tv_nsec;
  if(nanoseconds < 0) {
    nanoseconds += 1000000000;
    seconds--;
  }

  printf("%d.%09lds\n", seconds, nanoseconds);
  return 0;
}

Приклади випадків:

robert@unity:~/c/se-mask$ gcc -O3 se-mask.c -lrt -o se-mask
robert@unity:~/c/se-mask$ head testcase-long
30
210211202222222211222112102111220022202222210122222212220210
010222222120210221012002220212102220002222221122222220022212
111022212212022222222220111120022120122121022212211202022010
022121221020201212200211120100202222212222122222102220020212
112200102110212002122122011102201021222222120200211222002220
121102222220221210220212202012110201021201200010222200221002
022220200201222002020110122212211202112011102220212120221111
012220222200211200020022121202212222022012201201210222200212
210211221022122020011220202222010222011101220121102101200122
robert@unity:~/c/se-mask$ ./se-mask < testcase-long
298208861472
0.001615834s
robert@unity:~/c/se-mask$ head testcase-hard
8
0222222222222222
1222222222222222
2022222222222222
2122222222222222
2202222222222222
2212222222222222
2220222222222222
2221222222222222
2222022222222222
robert@unity:~/c/se-mask$ ./se-mask < testcase-hard
12870
3.041261458s
robert@unity:~/c/se-mask$ 

(Час призначений для процесора i7-4770K на 4,1 ГГц.) Будьте уважні, testcase-hardвикористовуйте близько 3-4 ГБ пам'яті.

Це в значній мірі реалізована реалізація методу включення-виключення blutorange, але зроблена так, що вона буде обробляти перехрестя будь-якої глибини. Як написаний код витрачає багато часу на розподіл пам'яті, і він стане ще швидшим, як тільки я оптимізую управління пам’яттю.

Я поголив близько 25% testcase-hard, але продуктивність оригіналу ( testcase-long) майже не змінилася, оскільки там не відбувається багато розподілу пам'яті. Я збираюся налаштувати трохи більше, перш ніж зателефонувати: я думаю, що я міг би також отримати 25% -50% покращення testcase-long.

Математика

Як тільки я помітив, що це проблема #SAT, я зрозумів, що можу використовувати вбудований Mathematica SatisfiabilityCount:

AbsoluteTiming[
 (* download test case *)
 input = Map[FromDigits, 
   Characters[
    Rest[StringSplit[
      Import["http://pastebin.com/raw.php?i=2Dg7gbfV", 
       "Text"]]]], {2}]; n = Length[First[input]];
 (* create boolean function *)
 bool = BooleanCountingFunction[{n/2}, n] @@ Array[x, n] && 
   Or @@ Table[
     And @@ MapIndexed[# == 2 || Xor[# == 1, x[First[#2]]] &, i], {i, 
      input}];
 (* count instances *)
 SatisfiabilityCount[bool, Array[x, n]]
]

Вихід:

{1.296944, 298208861472}

Це 298 208 861 472 масок за 1,3 секунди (i7-3517U при 1,9 ГГц), включаючи час, витрачений на завантаження тестового випадку з пастебіна.


Тому я переписав це на C ... на жаль, для мене занадто швидко використовувати gperftools! Я знайду кілька складних тестових випадків, перш ніж завтра розміщую повідомлення.
2012р. Кемпіон

testcase-hardможе бути завершено дуже швидко, якщо ваш код шукає маски, які можна комбінувати. Якщо ваш код це робить, видаліть кожен інший рядок (так /^2*02*$/залишаються лише випадки). Я не думаю, що цей випадок можна оптимізувати.
2012р. Кемпіон

4

рубін, досить швидкий, але це залежить від введення

Тепер пришвидшити на коефіцієнт 2 ~ 2,5 шляхом переходу від рядків до цілих чисел.

Використання:

cat <input> | ruby this.script.rb

Напр.

mad_gaksha@madlab ~/tmp $ ruby c50138.rb < c50138.inp2
number of matches: 298208861472
took 0.05726237 s

Кількість збігів для однієї маски легко обчислюється двочленним коефіцієнтом. Так, наприклад, 122020потрібно 2заповнити 3 с, 1 0і 2 1. Таким чином, існують nCr(3,2)=nCr(3,1)=3!/(2!*1!)=3різні бінарні рядки, що відповідають цій масці.

Перетин між n масками m_1, m_2, ... m_n - це маска q, така що двійковий рядок s відповідає q лише якщо вона відповідає всім маскам m_i.

Якщо взяти дві маски m_1 і m_2, її перетин легко обчислити. Просто встановіть m_1 [i] = m_2 [i], якщо m_1 [i] == 2. Перетин між 122020і 111222є 111020:

122020 (matched by 3 strings, 111000 110010 101010)
111222 (matched by 1 string, 111000)
111020 (matched by 1 string, 111000)

Дві окремі маски поєднуються 3 + 1 = 4 рядки, міжсекційна маска зіставлена ​​однією струною, таким чином, є 3 + 1-1 = 3 унікальних рядка, що відповідають одній або обом маскам.

Я зателефоную N (m_1, m_2, ...) кількість рядків, які відповідають всім m_i. Застосовуючи ту ж логіку, що і вище, ми можемо обчислити кількість унікальних рядків, зіставлених принаймні однією маскою, заданими принципом виключення включення, а також див. Нижче, як це:

N(m_1) + N(m_2) + ... + N(m_n) - N(m_1,m_2) - ... - N(m_n-1,m_n) + N(m_1,m_2,m_3) + N(m_1,m_2,m_4) + ... N(m_n-2,m_n-1,m_n) - N(m_1,m_2,m_3,m_4) -+ ...

Є багато, багато, багато комбінацій прийому, скажімо, 30 масок з 200.

Отже, це рішення робить припущення, що існує не так багато перехресть високого порядку вхідних масок, тобто. більшість n-кортежів n> 2 масок не матимуть спільних збігів.

Використовуйте код тут, код у ideone може бути застарілим.

Я додав функцію, remove_duplicatesяку можна використовувати для попередньої обробки введення та видалення масок m_iтаким чином, що всі рядки, які відповідають їй, також відповідають іншій масці m_j., Для поточного введення це фактично займає більше часу, оскільки таких масок немає (або їх не багато) , тому функція не застосовується до даних ще в наведеному нижче коді.

Код:

# factorial table
FAC = [1]
def gen_fac(n)
  n.times do |i|
    FAC << FAC[i]*(i+1)
  end
end

# generates a mask such that it is matched by each string that matches m and n
def diff_mask(m,n)
  (0..m.size-1).map do |i|
    c1 = m[i]
    c2 = n[i]
    c1^c2==1 ? break : c1&c2
  end
end

# counts the number of possible balanced strings matching the mask
def count_mask(m)
  n = m.size/2
  c0 = n-m.count(0)
  c1 = n-m.count(1)
  if c0<0 || c1<0
    0
  else
    FAC[c0+c1]/(FAC[c0]*FAC[c1])
  end
end

# removes masks contained in another
def remove_duplicates(m)
  m.each do |x|
    s = x.join
    m.delete_if do |y|
      r = /\A#{s.gsub(?3,?.)}\Z/
      (!x.equal?(y) && y =~ r) ? true : false
    end
  end
end

#intersection masks of cn masks from m.size masks
def mask_diff_combinations(m,n=1,s=m.size,diff1=[3]*m[0].size,j=-1,&b)
  (j+1..s-1).each do |i|
    diff2 = diff_mask(diff1,m[i])
    if diff2
      mask_diff_combinations(m,n+1,s,diff2,i,&b) if n<s
      yield diff2,n
    end
  end
end

# counts the number of balanced strings matched by at least one mask
def count_n_masks(m)
  sum = 0
  mask_diff_combinations(m) do |mask,i|
    sum += i%2==1 ? count_mask(mask) : -count_mask(mask)
  end
  sum
end

time = Time.now

# parse input
d = STDIN.each_line.map do |line|
  line.chomp.strip.gsub('2','3')
end
d.delete_if(&:empty?)
d.shift
d.map!{|x|x.chars.map(&:to_i)}

# generate factorial table
gen_fac([d.size,d[0].size].max+1)

# count masks
puts "number of matches: #{count_n_masks(d)}"
puts "took #{Time.now-time} s"

Це називається принципом виключення включення, але перед тим, як хтось на мене вказав на це, у мене було власне доведення, так ось що. Хоча щось робити, то чудово себе почуваєш.

Розглянемо випадок 2 масок, зателефонуйте потім 0і 1, спочатку. Ми беремо кожну збалансовану двійкову рядок і класифікуємо її відповідно до того, яка маска (и) вона відповідає. c0Число тих , які відповідають лише маскують 0, c1Nunber з тих , які відповідають тільки 1, c01ті , що маски матч 0і 1.

Дозвольте s0бути числовою кількістю кількості збігів для кожної маски (вони можуть перекриватися). Нехай s1буде сума кількості відповідностей для кожної пари (2-комбінація) масок. Нехай s_iбуде сума кількості збігів для кожної (i + 1) комбінації масок. Кількість збігів n-масок - це кількість двійкових рядків, що відповідають усім маскам.

Якщо є n масок, бажаний вихід - це сума всіх cs, тобто. c = c0+...+cn+c01+c02+...+c(n-2)(n-1)+c012+...+c(n-3)(n-2)(n-1)+...+c0123...(n-2)(n-1). Програма, яка обчислює, - це чергування суми всіх s, тобто. s = s_0-s_1+s_2-+...+-s_(n-1). Ми хочемо довести це s==c.

n = 1 очевидно. Розглянемо n = 2. Підрахунок всіх матчів маски 0дає c0+c01(кількість рядків , відповідне тільки 0 + ті відповідності , як 0і 1), вважаючи всі матчі 1дає c1+c02. Ми можемо проілюструвати це так:

0: c0 c01
1: c1 c10

За визначенням s0 = c0 + c1 + c12. s1- це сума кількість збігів кожної 2-комбінації [0,1], тобто. всі uniqye c_ijs. Майте на увазі це c01=c10.

s0 = c0 + c1 + 2 c01
s1 = c01
s = s0 - s1 = c0 + c1 + c01 = c

Таким чином s=cпри n = 2.

Тепер розглянемо n = 3.

0  : c0 + c01 + c02 + c012
1  : c1 + c01 + c12 + c012
2  : c2 + c12 + c02 + c012
01 : c01 + c012
02 : c02 + c012
12 : c12 + c012
012: c012

s0 = c0 + c1 + c2 + 2 (c01+c02+c03) + 3 c012
s1 = c01 + c02 + c12 + 3 c012
s2 = c012

s0 = c__0 + 2 c__1 + 3 c__2
s1 =          c__1 + 3 c__2
s2 =                   c__2

s = s0 - s1 + s2 = ... = c0 + c1 + c2 + c01 + c02 + c03 + c012 = c__0 + c__1 + c__2 = c

Таким чином s=cпри n = 3. c__iявляє собою всі cs з (i + 1) індексами, наприклад, c__1 = c01для n = 2 та c__1 = c01 + c02 + c12n == 3.

При n = 4 починає формуватися закономірність:

0:   c0 + c01 + c02 + c03 + c012 + c013 + c023 + c0123
1:   c1 + c01 + c12 + c13 + c102 + c103 + c123 + c0123
2:   c2 + c02 + c12 + c23 + c201 + c203 + c213 + c0123
3:   c3 + c03 + c13 + c23 + c301 + c302 + c312 + c0123

01:  c01 + c012 + c013 + c0123
02:  c02 + c012 + c023 + c0123
03:  c03 + c013 + c023 + c0123
12:  c11 + c012 + c123 + c0123
13:  c13 + c013 + c123 + c0123
23:  c23 + c023 + c123 + c0123

012:  c012 + c0123
013:  c013 + c0123
023:  c023 + c0123
123:  c123 + c0123

0123: c0123

s0 = c__0 + 2 c__1 + 3 c__2 + 4 c__3
s1 =          c__1 + 3 c__2 + 6 c__3
s2 =                   c__2 + 4 c__3
s3 =                            c__3

s = s0 - s1 + s2 - s3 = c__0 + c__1 + c__2 + c__3 = c

Таким чином s==cпри n = 4.

Взагалі ми отримуємо біноміальні коефіцієнти на зразок цього (↓ є i, → є j):

   0  1  2  3  4  5  6  .  .  .

0  1  2  3  4  5  6  7  .  .  .
1     1  3  6  10 15 21 .  .  .
2        1  4  10 20 35 .  .  .
3           1  5  15 35 .  .  .
4              1  6  21 .  .  .
5                 1  7  .  .  .
6                    1  .  .  . 
.                       .
.                          .
.                             .

Щоб побачити це, врахуйте, що для деяких iі jє:

  • x = ncr (n, i + 1): комбінації C для перетину (i + 1) маски поза n
  • y = ncr (ni-1, ji): для кожної комбінації C вище є y різні комбінації для перетину (j + 2) масок із тих, що містять C
  • z = ncr (n, j + 1): різні комбінації для перетину (j + 1) масок з n

Оскільки це може здатися заплутаним, ось визначення, застосоване до прикладу. Для i = 1, j = 2, n = 4, це виглядає приблизно так (див. Вище):

01:  c01 + c012 + c013 + c0123
02:  c02 + c012 + c023 + c0123
03:  c03 + c013 + c023 + c0123
12:  c11 + c012 + c123 + c0123
13:  c13 + c013 + c123 + c0123
23:  c23 + c023 + c123 + c0123

Отже, тут x = 6 (01, 02, 03, 12, 13, 23), y = 2 (два c з трьома показниками для кожної комбінації), z = 4 (c012, c013, c023, c123).

Загалом є x*yкоефіцієнти cз (j + 1) індексами, і є zрізні, тому кожен виникає x*y/zразів, які ми називаємо коефіцієнтом k_ij. За допомогою простої алгебри ми отримуємо k_ij = ncr(n,i+1) ncr(n-i-1,j-i) / ncr(n,j+1) = ncr(j+1,i+1).

Отже, індекс задається: k_ij = nCr(j+1,i+1)Якщо ви пригадуєте всі визначення, все, що нам потрібно показати, - це те, що чергування кожної колонки дає 1.

Таким чином, чергується сума s0 - s1 + s2 - s3 +- ... +- s(n-1)може бути виражена як:

s_j = c__j * ∑[(-1)^(i+j) k_ij] for i=0..n-1
     = c__j * ∑[(-1)^(i+j) nCr(j+1,i+1)] for i=0..n-1
     = c__j * ∑[(-1)^(i+j) nCr(j+1,i)]{i=0..n} - (-1)^0 nCr(j+1,0)
     = (-1)^j c__j

s   = ∑[(-1)^j  s_j] for j = 0..n-1
    = ∑[(-1)^j (-1)^j c__j)] for j=0..n-1
    = ∑[c__j] for j=0..n-1
    = c

Таким чином s=cдля всіх n = 1,2,3, ...


1
Я не впевнений, чи знаєте ви, але метод, який ви застосовуєте, це en.wikipedia.org/wiki/Inclusion%E2%80%93exclusion_principle , тому вам не доведеться цього доводити, якщо це було те, що ви намагаєтеся робити. Крім того, не потрібні для тестових випадків, ви можете усунути з груп маски, які повністю включені до іншої маски групи. Наприклад у TC5: 0011 < 2211, 0022 < 0222. Я думаю, що це робить групи не більшими 2*n, хоча вони все ще занадто великі в гіршому випадку.
нутки

@nutki Я про це не знав, тому дякую за посилання. Іноді доводити і думати про щось для себе - все ж приємна вправа :) Хоча :). Що стосується вашої пропозиції, так, мені трапилося це зробити, але я не думаю, що я збираюся її реалізувати, якщо не буде додано тестовий випадок, який вимагає від нього результату за розумну кількість часу.
blutorange

@blutorange ти думав використовувати дерево рішень?
грудня

Я думаю, ви маєте на увазі перехрестя (відповідає обом маскам), а не з'єднання (відповідає тій чи іншій масці).
2012р. Кампіон

@ 2012rcampion Як в unifying two masksтерміні unionмає сенс для мене, і я ксан визначаю саме так, але ти маєш рацію в інтересах взаєморозуміння, якого я переслідував. @ Agawa001 Чи можете ви бути більш конкретними? Крім того, якщо у вас є гарна ідея зробити це швидше, сміливо використовуйте будь-які ідеї з цієї відповіді для вашої програми / відповіді. Наразі це досить швидко для великого тестового випадку, і якщо його зробити багатопотоковою, він повинен зайняти <0,1 с, що нижче будь-якого значущого вимірювання / порівняння, тому для більш важких тестових випадків потрібно.
blutorange

1

С

#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <gsl/gsl_combination.h>

int main (int argc, char *argv[]) {

    printf ("reading\n");
    char buffer[100];
    gets(buffer);
    char n = atoi(buffer);

    char *masks[1000];
    masks[0] = malloc(2 * n * sizeof(char));
    char c,nrows,j,biggestzerorun,biggestonerun,currentzerorun,currentonerun = 0;

    while ((c = getchar()) && c != EOF) {
        if (c == '\n') {
            nrows++;
            if (currentonerun > biggestonerun) {
                biggestonerun = currentonerun;
            }
            if (currentzerorun > biggestzerorun) {
                biggestzerorun = currentzerorun;
            }
            j=currentonerun=currentzerorun=0;
            masks[nrows] = malloc(2 * n * sizeof(char));
        } else if (c == '0') {
            masks[nrows][j++] = 1;
            currentzerorun++;
            if (currentonerun > biggestonerun) {
                biggestonerun = currentonerun;
            }
            currentonerun=0;
        } else if (c == '1') {
            masks[nrows][j++] = 2;
            currentonerun++;
            if (currentzerorun > biggestzerorun) {
                biggestzerorun = currentzerorun;
            }
            currentonerun=0;
        } else if (c == '2') {
            masks[nrows][j++] = 3;
            currentonerun++;
            currentzerorun++;
        }
    }
    if (currentonerun > biggestonerun) {
        biggestonerun = currentonerun;
    }
    if (currentzerorun > biggestzerorun) {
        biggestzerorun = currentzerorun;
    }

    printf("preparing combinations\n");

    int nmatches=0;

    gsl_combination *combination = gsl_combination_calloc(2*n, n);

    printf("entering loop:\n");

    do {
        char vector[2*n];
        char currentindex, previousindex;
        currentonerun = 0;
        memset(vector, 1, 2*n);


        // gsl_combination_fprintf (stdout, combination, "%u ");
        // printf(": ");

        for (char k=0; k<n; k++) {
            previousindex = currentindex;
            currentindex = gsl_combination_get(combination, k);
            if (k>0) {
                if (currentindex - previousindex == 1) {
                    currentonerun++;
                    if (currentonerun > biggestonerun) {
                        goto NEXT;
                    }
                } else {
                    currentonerun=0;
                    if (currentindex - previousindex > biggestzerorun) {
                        goto NEXT;
                    }
                }
            }
            vector[currentindex] = 2;
        }

        for (char k=0; k<=nrows; k++) {
            char ismatch = 1;
            for (char l=0; l<2*n; l++) {
                if (!(vector[l] & masks[k][l])) {
                    ismatch = 0;
                    break;
                }
            }
            if (ismatch) {
                nmatches++;
                break;
            }
        }

        NEXT: 1;

    } while (
        gsl_combination_next(combination) == GSL_SUCCESS
    );

    printf ("RESULT: %i\n", nmatches);

    gsl_combination_free(combination);
    for (; nrows>=0; nrows--) {
        free(masks[nrows]);
    }
}

Удачі, щоб отримати великий внесок для цього - можливо, знадобиться цілу ніч, щоб пройти ок. 60 ^ 30 перестановок! Можливо, набір даних проміжного розміру може бути хорошою ідеєю?

Використовуючи наш веб-сайт, ви визнаєте, що прочитали та зрозуміли наші Політику щодо файлів cookie та Політику конфіденційності.
Licensed under cc by-sa 3.0 with attribution required.