#define NULL ((void *)0)
typedef unsigned long size_t; // Customize by platform.
typedef long intptr_t;
typedef unsigned long uintptr_t;
typedef long scalar_t__; // Either arithmetic or pointer type.
/* By default, we understand bool (as a convenience). */
typedef int bool;
#define false 0
#define true 1

/* Forward declarations */

/* Type definitions */

/* Variables and functions */
int /*<<< orphan*/ printf(char *, int);
int /*<<< orphan*/ scanf(char *, ...);
int main(void) {
  int t, i, n, r = 0, g = 0, b = 0, max;
  char s[100005];
  scanf("%d", &t);
  while (t--) {
    r = 0;
    g = 0;
    b = 0;
    scanf("%d", &n);
    scanf("%s", s);
    for (i = 0; i < n; i++) {
      if (s[i] == 'R')
        r++;
      else if (s[i] == 'B')
        b++;
      else if (s[i] == 'G')
        g++;
    }
    max = (((r) > (b)) ? (r) : (b));
    max = (((max) > (g)) ? (max) : (g));
    printf("%d\n", n - max);
  }
  return 0;
}


x86 assembly (clang, -O0):
<main>:
push   %rbp
mov    %rsp,%rbp
sub    $0x186e0,%rsp
movl   $0x0,-0x4(%rbp)
movl   $0x0,-0x14(%rbp)
movl   $0x0,-0x18(%rbp)
movl   $0x0,-0x1c(%rbp)
lea    0xeb2(%rip),%rdi
lea    -0x8(%rbp),%rsi
mov    $0x0,%al
call   1040 <scanf@plt>
mov    -0x8(%rbp),%eax
mov    %eax,%ecx
add    $0xffffffff,%ecx
mov    %ecx,-0x8(%rbp)
cmp    $0x0,%eax
je     12ac <main+0x18c>
movl   $0x0,-0x14(%rbp)
movl   $0x0,-0x18(%rbp)
movl   $0x0,-0x1c(%rbp)
lea    0xe77(%rip),%rdi
lea    -0x10(%rbp),%rsi
mov    $0x0,%al
call   1040 <scanf@plt>
lea    -0x186d0(%rbp),%rsi
lea    0xe61(%rip),%rdi
mov    $0x0,%al
call   1040 <scanf@plt>
movl   $0x0,-0xc(%rbp)
mov    -0xc(%rbp),%eax
cmp    -0x10(%rbp),%eax
jge    123d <main+0x11d>
movslq -0xc(%rbp),%rax
movsbl -0x186d0(%rbp,%rax,1),%eax
ff
cmp    $0x52,%eax
jne    11df <main+0xbf>
mov    -0x14(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x14(%rbp)
jmp    122a <main+0x10a>
movslq -0xc(%rbp),%rax
movsbl -0x186d0(%rbp,%rax,1),%eax
ff
cmp    $0x42,%eax
jne    1202 <main+0xe2>
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
jmp    1225 <main+0x105>
movslq -0xc(%rbp),%rax
movsbl -0x186d0(%rbp,%rax,1),%eax
ff
cmp    $0x47,%eax
jne    1220 <main+0x100>
mov    -0x18(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x18(%rbp)
jmp    1225 <main+0x105>
jmp    122a <main+0x10a>
jmp    122f <main+0x10f>
mov    -0xc(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0xc(%rbp)
jmp    11b0 <main+0x90>
mov    -0x14(%rbp),%eax
cmp    -0x1c(%rbp),%eax
jle    1257 <main+0x137>
mov    -0x14(%rbp),%eax
mov    %eax,-0x186d4(%rbp)
jmp    1260 <main+0x140>
mov    -0x1c(%rbp),%eax
mov    %eax,-0x186d4(%rbp)
mov    -0x186d4(%rbp),%eax
mov    %eax,-0x20(%rbp)
mov    -0x20(%rbp),%eax
cmp    -0x18(%rbp),%eax
jle    1283 <main+0x163>
mov    -0x20(%rbp),%eax
mov    %eax,-0x186d8(%rbp)
jmp    128c <main+0x16c>
mov    -0x18(%rbp),%eax
mov    %eax,-0x186d8(%rbp)
mov    -0x186d8(%rbp),%eax
mov    %eax,-0x20(%rbp)
mov    -0x10(%rbp),%esi
sub    -0x20(%rbp),%esi
lea    0xd64(%rip),%rdi
call   1030 <printf@plt>
jmp    1159 <main+0x39>
xor    %eax,%eax
add    $0x186e0,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<main>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x186b8,%rsp
lea    0xec8(%rip),%rdi
lea    0x8(%rsp),%rsi
xor    %eax,%eax
call   1040 <scanf@plt>
subl   $0x1,0x8(%rsp)
jae    115f <main+0x3f>
xor    %eax,%eax
add    $0x186b8,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret
lea    0xc(%rsp),%r15
lea    0xe98(%rip),%r12
lea    0x10(%rsp),%r13
lea    0xe8f(%rip),%r14
jmp    119b <main+0x7b>
add    $0x1,%ebp
nopl   0x0(%rax)
cmp    %eax,%ebp
cmovg  %ebp,%eax
cmp    %ecx,%eax
cmovle %ecx,%eax
sub    %eax,%esi
mov    %r14,%rdi
call   1030 <printf@plt>
subl   $0x1,0x8(%rsp)
jb     114b <main+0x2b>
xor    %ebp,%ebp
lea    0xe5c(%rip),%rdi
mov    %r15,%rsi
xor    %eax,%eax
call   1040 <scanf@plt>
mov    %r12,%rdi
mov    %r13,%rsi
xor    %eax,%eax
call   1040 <scanf@plt>
mov    0xc(%rsp),%esi
mov    $0x0,%ecx
mov    $0x0,%eax
test   %esi,%esi
jle    1180 <main+0x60>
cmp    $0x1,%esi
jne    1200 <main+0xe0>
xor    %edx,%edx
xor    %eax,%eax
xor    %ecx,%ecx
xor    %ebp,%ebp
test   $0x1,%sil
je     1180 <main+0x60>
mov    0x10(%rsp,%rdx,1),%dl
cmp    $0x42,%dl
je     1275 <main+0x155>
cmp    $0x52,%dl
je     1179 <main+0x59>
cmp    $0x47,%dl
jne    1180 <main+0x60>
add    $0x1,%ecx
jmp    1180 <main+0x60>
nopl   0x0(%rax)
mov    %esi,%edi
and    $0xfffffffe,%edi
xor    %edx,%edx
xor    %eax,%eax
xor    %ecx,%ecx
xor    %ebp,%ebp
jmp    121c <main+0xfc>
nop
add    $0x1,%ebp
add    $0x2,%rdx
cmp    %rdx,%rdi
je     11da <main+0xba>
movzbl 0x10(%rsp,%rdx,1),%ebx
cmp    $0x42,%bl
je     1250 <main+0x130>
cmp    $0x47,%bl
je     1240 <main+0x120>
cmp    $0x52,%bl
jne    1253 <main+0x133>
add    $0x1,%ebp
jmp    1253 <main+0x133>
cs nopw 0x0(%rax,%rax,1)
nop
add    $0x1,%ecx
jmp    1253 <main+0x133>
cs nopw 0x0(%rax,%rax,1)
nop
add    $0x1,%eax
movzbl 0x11(%rsp,%rdx,1),%ebx
cmp    $0x42,%bl
je     1270 <main+0x150>
cmp    $0x52,%bl
je     1210 <main+0xf0>
cmp    $0x47,%bl
jne    1213 <main+0xf3>
add    $0x1,%ecx
jmp    1213 <main+0xf3>
nopl   0x0(%rax)
add    $0x1,%eax
jmp    1213 <main+0xf3>
add    $0x1,%eax
jmp    1180 <main+0x60>

LLVM IR (-O0):
@.str = [3 x i8] c"%d\00"
@.str.1 = [3 x i8] c"%s\00"
@.str.2 = [4 x i8] c"%d\0A\00"
define i32 @main() {
%1 = alloca i32
%2 = alloca i32
%3 = alloca i32
%4 = alloca i32
%5 = alloca i32
%6 = alloca i32
%7 = alloca i32
%8 = alloca i32
%9 = alloca [100005 x i8]
store i32 0, i32* %1
store i32 0, i32* %5
store i32 0, i32* %6
store i32 0, i32* %7
%10 = call i32 (i8*, ...) @scanf(i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str, i64 0, i64 0), i32* %2)
br label %11
11: ; preds = %76, %0
%12 = load i32, i32* %2
%13 = add nsw i32 %12, -1
store i32 %13, i32* %2
%14 = icmp ne i32 %12, 0
br i1 %14, label %15, label %82
15: ; preds = %11
store i32 0, i32* %5
store i32 0, i32* %6
store i32 0, i32* %7
%16 = call i32 (i8*, ...) @scanf(i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str, i64 0, i64 0), i32* %4)
%17 = getelementptr inbounds [100005 x i8], [100005 x i8]* %9, i64 0, i64 0
%18 = call i32 (i8*, ...) @scanf(i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str.1, i64 0, i64 0), i8* %17)
store i32 0, i32* %3
br label %19
19: ; preds = %56, %15
%20 = load i32, i32* %3
%21 = load i32, i32* %4
%22 = icmp slt i32 %20, %21
br i1 %22, label %23, label %59
23: ; preds = %19
%24 = load i32, i32* %3
%25 = sext i32 %24 to i64
%26 = getelementptr inbounds [100005 x i8], [100005 x i8]* %9, i64 0, i64 %25
%27 = load i8, i8* %26
%28 = sext i8 %27 to i32
%29 = icmp eq i32 %28, 82
br i1 %29, label %30, label %33
30: ; preds = %23
%31 = load i32, i32* %5
%32 = add nsw i32 %31, 1
store i32 %32, i32* %5
br label %55
33: ; preds = %23
%34 = load i32, i32* %3
%35 = sext i32 %34 to i64
%36 = getelementptr inbounds [100005 x i8], [100005 x i8]* %9, i64 0, i64 %35
%37 = load i8, i8* %36
%38 = sext i8 %37 to i32
%39 = icmp eq i32 %38, 66
br i1 %39, label %40, label %43
40: ; preds = %33
%41 = load i32, i32* %7
%42 = add nsw i32 %41, 1
store i32 %42, i32* %7
br label %54
43: ; preds = %33
%44 = load i32, i32* %3
%45 = sext i32 %44 to i64
%46 = getelementptr inbounds [100005 x i8], [100005 x i8]* %9, i64 0, i64 %45
%47 = load i8, i8* %46
%48 = sext i8 %47 to i32
%49 = icmp eq i32 %48, 71
br i1 %49, label %50, label %53
50: ; preds = %43
%51 = load i32, i32* %6
%52 = add nsw i32 %51, 1
store i32 %52, i32* %6
br label %53
53: ; preds = %50, %43
br label %54
54: ; preds = %53, %40
br label %55
55: ; preds = %54, %30
br label %56
56: ; preds = %55
%57 = load i32, i32* %3
%58 = add nsw i32 %57, 1
store i32 %58, i32* %3
br label %19
59: ; preds = %19
%60 = load i32, i32* %5
%61 = load i32, i32* %7
%62 = icmp sgt i32 %60, %61
br i1 %62, label %63, label %65
63: ; preds = %59
%64 = load i32, i32* %5
br label %67
65: ; preds = %59
%66 = load i32, i32* %7
br label %67
67: ; preds = %65, %63
%68 = phi i32 [ %64, %63 ], [ %66, %65 ]
store i32 %68, i32* %8
%69 = load i32, i32* %8
%70 = load i32, i32* %6
%71 = icmp sgt i32 %69, %70
br i1 %71, label %72, label %74
72: ; preds = %67
%73 = load i32, i32* %8
br label %76
74: ; preds = %67
%75 = load i32, i32* %6
br label %76
76: ; preds = %74, %72
%77 = phi i32 [ %73, %72 ], [ %75, %74 ]
store i32 %77, i32* %8
%78 = load i32, i32* %4
%79 = load i32, i32* %8
%80 = sub nsw i32 %78, %79
%81 = call i32 @printf(i8* getelementptr inbounds ([4 x i8], [4 x i8]* @.str.2, i64 0, i64 0), i32 %80)
br label %11
82: ; preds = %11
ret i32 0
}

LLVM IR (-O2):
@.str = [3 x i8] c"%d\00"
@.str.1 = [3 x i8] c"%s\00"
@.str.2 = [4 x i8] c"%d\0A\00"
define i32 @main() {
%1 = alloca i32
%2 = alloca i32
%3 = alloca [100005 x i8]
%4 = bitcast i32* %1 to i8*
%5 = bitcast i32* %2 to i8*
%6 = getelementptr inbounds [100005 x i8], [100005 x i8]* %3, i64 0, i64 0
%7 = call i32 (i8*, ...) @scanf(i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str, i64 0, i64 0), i32* %1)
%8 = load i32, i32* %1
%9 = add nsw i32 %8, -1
store i32 %9, i32* %1
%10 = icmp eq i32 %8, 0
br i1 %10, label %87, label %11
11: ; preds = %0, %74
%12 = call i32 (i8*, ...) @scanf(i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str, i64 0, i64 0), i32* %2)
%13 = call i32 (i8*, ...) @scanf(i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str.1, i64 0, i64 0), i8* %6)
%14 = load i32, i32* %2
%15 = icmp sgt i32 %14, 0
br i1 %15, label %16, label %74
16: ; preds = %11
%17 = zext i32 %14 to i64
%18 = and i64 %17, 1
%19 = icmp eq i32 %14, 1
br i1 %19, label %56, label %20
20: ; preds = %16
%21 = and i64 %17, 4294967294
br label %22
22: ; preds = %49, %20
%23 = phi i64 [ 0, %20 ], [ %53, %49 ]
%24 = phi i32 [ 0, %20 ], [ %52, %49 ]
%25 = phi i32 [ 0, %20 ], [ %51, %49 ]
%26 = phi i32 [ 0, %20 ], [ %50, %49 ]
%27 = phi i64 [ 0, %20 ], [ %54, %49 ]
%28 = getelementptr inbounds [100005 x i8], [100005 x i8]* %3, i64 0, i64 %23
%29 = load i8, i8* %28
switch i8 %29, label %36 [
i8 82, label %30
i8 66, label %32
i8 71, label %34
]
30: ; preds = %22
%31 = add nsw i32 %26, 1
br label %36
32: ; preds = %22
%33 = add nsw i32 %24, 1
br label %36
34: ; preds = %22
%35 = add nsw i32 %25, 1
br label %36
36: ; preds = %22, %30, %34, %32
%37 = phi i32 [ %31, %30 ], [ %26, %32 ], [ %26, %34 ], [ %26, %22 ]
%38 = phi i32 [ %25, %30 ], [ %25, %32 ], [ %35, %34 ], [ %25, %22 ]
%39 = phi i32 [ %24, %30 ], [ %33, %32 ], [ %24, %34 ], [ %24, %22 ]
%40 = or i64 %23, 1
%41 = getelementptr inbounds [100005 x i8], [100005 x i8]* %3, i64 0, i64 %40
%42 = load i8, i8* %41
switch i8 %42, label %49 [
i8 82, label %47
i8 66, label %45
i8 71, label %43
]
43: ; preds = %36
%44 = add nsw i32 %38, 1
br label %49
45: ; preds = %36
%46 = add nsw i32 %39, 1
br label %49
47: ; preds = %36
%48 = add nsw i32 %37, 1
br label %49
49: ; preds = %47, %45, %43, %36
%50 = phi i32 [ %48, %47 ], [ %37, %45 ], [ %37, %43 ], [ %37, %36 ]
%51 = phi i32 [ %38, %47 ], [ %38, %45 ], [ %44, %43 ], [ %38, %36 ]
%52 = phi i32 [ %39, %47 ], [ %46, %45 ], [ %39, %43 ], [ %39, %36 ]
%53 = add nuw nsw i64 %23, 2
%54 = add i64 %27, 2
%55 = icmp eq i64 %54, %21
br i1 %55, label %56, label %22
56: ; preds = %49, %16
%57 = phi i32 [ undef, %16 ], [ %50, %49 ]
%58 = phi i32 [ undef, %16 ], [ %51, %49 ]
%59 = phi i32 [ undef, %16 ], [ %52, %49 ]
%60 = phi i64 [ 0, %16 ], [ %53, %49 ]
%61 = phi i32 [ 0, %16 ], [ %52, %49 ]
%62 = phi i32 [ 0, %16 ], [ %51, %49 ]
%63 = phi i32 [ 0, %16 ], [ %50, %49 ]
%64 = icmp eq i64 %18, 0
br i1 %64, label %74, label %65
65: ; preds = %56
%66 = getelementptr inbounds [100005 x i8], [100005 x i8]* %3, i64 0, i64 %60
%67 = load i8, i8* %66
switch i8 %67, label %74 [
i8 82, label %72
i8 66, label %70
i8 71, label %68
]
68: ; preds = %65
%69 = add nsw i32 %62, 1
br label %74
70: ; preds = %65
%71 = add nsw i32 %61, 1
br label %74
72: ; preds = %65
%73 = add nsw i32 %63, 1
br label %74
74: ; preds = %56, %72, %70, %68, %65, %11
%75 = phi i32 [ 0, %11 ], [ %57, %56 ], [ %73, %72 ], [ %63, %70 ], [ %63, %68 ], [ %63, %65 ]
%76 = phi i32 [ 0, %11 ], [ %58, %56 ], [ %62, %72 ], [ %62, %70 ], [ %69, %68 ], [ %62, %65 ]
%77 = phi i32 [ 0, %11 ], [ %59, %56 ], [ %61, %72 ], [ %71, %70 ], [ %61, %68 ], [ %61, %65 ]
%78 = icmp sgt i32 %75, %77
%79 = select i1 %78, i32 %75, i32 %77
%80 = icmp sgt i32 %79, %76
%81 = select i1 %80, i32 %79, i32 %76
%82 = sub nsw i32 %14, %81
%83 = call i32 @printf(i8* getelementptr inbounds ([4 x i8], [4 x i8]* @.str.2, i64 0, i64 0), i32 %82)
%84 = load i32, i32* %1
%85 = add nsw i32 %84, -1
store i32 %85, i32* %1
%86 = icmp eq i32 %84, 0
br i1 %86, label %87, label %11
87: ; preds = %74, %0
ret i32 0
}