compileprofile-spacetests 0.3.0 → 0.4.0

package/jest.config.js

@@ -1,14 +1,14 @@
-module.exports = {
-  preset: 'ts-jest',
-  testEnvironment: 'node',
-  roots: ['<rootDir>/src'],
-  testMatch: ['**/__tests__/**/*.ts', '**/?(*.)+(spec|test).ts'],
-  transform: {
-    '^.+\\.ts$': 'ts-jest'
-  },
-  moduleFileExtensions: ['ts', 'js', 'json', 'node'],
-  // ignore test-utils folder
-  testPathIgnorePatterns: ['<rootDir>/src/__tests__/test-utils/'],
-  setupFilesAfterEnv: ['<rootDir>/src/__tests__/test-utils/testData.ts'],
-  moduleDirectories: ['node_modules', 'example-data']
+module.exports = {
+  preset: 'ts-jest',
+  testEnvironment: 'node',
+  roots: ['<rootDir>/src'],
+  testMatch: ['**/__tests__/**/*.ts', '**/?(*.)+(spec|test).ts'],
+  transform: {
+    '^.+\\.ts$': 'ts-jest'
+  },
+  moduleFileExtensions: ['ts', 'js', 'json', 'node'],
+  // ignore test-utils folder
+  testPathIgnorePatterns: ['<rootDir>/src/__tests__/test-utils/'],
+  setupFilesAfterEnv: ['<rootDir>/src/__tests__/test-utils/testData.ts'],
+  moduleDirectories: ['node_modules', 'example-data']
 }; 

package/original/emotion-recognition.R

@@ -1,39 +1,39 @@
-emotion_create_trial_table <- function(txt) {
-  emotion_values <- c(`0` = "neutral", `1` = "sad", `2` = "happy",
-                      `3` = "surprised", `4` = "angry")
-  df <- results_to_df(txt) %>%
-    emotions_extract_emotion() %>%
-    filter(!is.na(response), !is.na(emotion)) %>%
-    mutate(emotion_response = emotion_values[response + 1],
-           correct = emotion == emotion_response,
-           index = 1:n(),
-           block = c(rep("regular", 15), rep("quick", 15), rep("rotated", 15))) %>%
-    select(emotion, emotion_response, correct, index, block, image, rt)
-  return(df)
-}
-
-emotion_analyze_performance <- function(df) {
-  df_out <- df %>%
-    group_by(block) %>%
-    summarise(correct = sum(correct) / n(),
-              mean_rt = mean(rt),
-              .groups = "drop") %>%
-    rowwise() %>%
-    # We are making the performance metric to be the inverse of the correct
-    # so that lower values are always better (mean RT is better lower)
-    mutate(performance = ifelse(block == "quick", 1-correct, mean_rt/correct)) %>%
-    ungroup()
-  return(df_out)
-}
-
-emotions_extract_emotion <- function(df) {
-  URL <- "https://unyavwofnmwihnpvkjji.supabase.co/storage/v1/object/public/test-stimuli/emotions//final/"
-  df <- df %>%
-    mutate(
-      image = emotion,
-      emotion = gsub(URL, "", emotion),
-      emotion = gsub(".png", "", emotion),
-      emotion = gsub("_\\d+", "", emotion)
-    )
-  return(df)
-}
+emotion_create_trial_table <- function(txt) {
+  emotion_values <- c(`0` = "neutral", `1` = "sad", `2` = "happy",
+                      `3` = "surprised", `4` = "angry")
+  df <- results_to_df(txt) %>%
+    emotions_extract_emotion() %>%
+    filter(!is.na(response), !is.na(emotion)) %>%
+    mutate(emotion_response = emotion_values[response + 1],
+           correct = emotion == emotion_response,
+           index = 1:n(),
+           block = c(rep("regular", 15), rep("quick", 15), rep("rotated", 15))) %>%
+    select(emotion, emotion_response, correct, index, block, image, rt)
+  return(df)
+}
+
+emotion_analyze_performance <- function(df) {
+  df_out <- df %>%
+    group_by(block) %>%
+    summarise(correct = sum(correct) / n(),
+              mean_rt = mean(rt),
+              .groups = "drop") %>%
+    rowwise() %>%
+    # We are making the performance metric to be the inverse of the correct
+    # so that lower values are always better (mean RT is better lower)
+    mutate(performance = ifelse(block == "quick", 1-correct, mean_rt/correct)) %>%
+    ungroup()
+  return(df_out)
+}
+
+emotions_extract_emotion <- function(df) {
+  URL <- "https://unyavwofnmwihnpvkjji.supabase.co/storage/v1/object/public/test-stimuli/emotions//final/"
+  df <- df %>%
+    mutate(
+      image = emotion,
+      emotion = gsub(URL, "", emotion),
+      emotion = gsub(".png", "", emotion),
+      emotion = gsub("_\\d+", "", emotion)
+    )
+  return(df)
+}

package/original/gonogo.R

@@ -1,32 +1,32 @@
-gonogo_create_trial_table <- function(txt) {
-  arr <- fromJSON(txt)
-  df <- as.data.frame(fromJSON(arr[[1]]))
-  GONOGO_IMAGE_PATH <- "https://unyavwofnmwihnpvkjji.supabase.co/storage/v1/object/public/test-stimuli/gonogo/"
-  df <- filter(df, !is.na(image))
-  df <- select(df, trial_index, time_elapsed, rt,
-               response, block_number, image)
-  df$image <- gsub(GONOGO_IMAGE_PATH, "", df$image)
-  df$image <- gsub(".png", "", df$image)
-  df <- df %>%
-    mutate(
-      should_go = case_when(
-        block_number == 1 & grepl("astronaut_trans_1", image) ~ TRUE,
-        block_number == 2 & grepl("alien_trans_1", image) ~ TRUE,
-        block_number == 3 & grepl("rocket_trans_1", image) ~ TRUE,
-        block_number == 4 & !grepl("rocket_trans_1", image) ~ TRUE,
-        TRUE ~ FALSE),
-      did_go = !is.na(response),
-      correct = should_go == did_go
-    )
-  return(df)
-}
-
-gonogo_analyze_performance <- function(df) {
-  df_out <- df %>%
-    group_by(block = block_number) %>%
-    summarise(correct = sum(correct) / n(),
-              mean_rt = mean(rt[should_go], na.rm = TRUE),
-              performance = mean_rt / correct,
-              .groups = "drop")
-  return(df_out)
-}
+gonogo_create_trial_table <- function(txt) {
+  arr <- fromJSON(txt)
+  df <- as.data.frame(fromJSON(arr[[1]]))
+  GONOGO_IMAGE_PATH <- "https://unyavwofnmwihnpvkjji.supabase.co/storage/v1/object/public/test-stimuli/gonogo/"
+  df <- filter(df, !is.na(image))
+  df <- select(df, trial_index, time_elapsed, rt,
+               response, block_number, image)
+  df$image <- gsub(GONOGO_IMAGE_PATH, "", df$image)
+  df$image <- gsub(".png", "", df$image)
+  df <- df %>%
+    mutate(
+      should_go = case_when(
+        block_number == 1 & grepl("astronaut_trans_1", image) ~ TRUE,
+        block_number == 2 & grepl("alien_trans_1", image) ~ TRUE,
+        block_number == 3 & grepl("rocket_trans_1", image) ~ TRUE,
+        block_number == 4 & !grepl("rocket_trans_1", image) ~ TRUE,
+        TRUE ~ FALSE),
+      did_go = !is.na(response),
+      correct = should_go == did_go
+    )
+  return(df)
+}
+
+gonogo_analyze_performance <- function(df) {
+  df_out <- df %>%
+    group_by(block = block_number) %>%
+    summarise(correct = sum(correct) / n(),
+              mean_rt = mean(rt[should_go], na.rm = TRUE),
+              performance = mean_rt / correct,
+              .groups = "drop")
+  return(df_out)
+}

package/package.json

@@ -1,40 +1,40 @@
-{
-  "name": "compileprofile-spacetests",
-  "version": "0.3.0",
-  "description": "A package for evaluating cognitive test results from ",
-  "main": "dist/cjs/index.js",
-  "module": "dist/esm/index.js",
-  "types": "dist/cjs/index.d.ts",
-  "exports": {
-    ".": {
-      "import": "./dist/esm/index.js",
-      "require": "./dist/cjs/index.js"
-    }
-  },
-  "scripts": {
-    "build": "npm run build:csj && npm run build:esm",
-    "build:csj": "tsc --project tsconfig.cjs.json",
-    "build:esm": "tsc --project tsconfig.esm.json",
-    "test": "jest",
-    "output gonogo": "node dist/index.js",
-    "prepare": "npm run build"
-  },
-  "keywords": [
-    "cognitive",
-    "testing",
-    "memory",
-    "evaluation"
-  ],
-  "author": "",
-  "license": "MIT",
-  "devDependencies": {
-    "@types/jest": "^29.5.12",
-    "@types/node": "^20.11.24",
-    "jest": "^29.7.0",
-    "ts-jest": "^29.1.2",
-    "typescript": "^5.3.3"
-  },
-  "dependencies": {
-    "mathjs": "^14.4.0"
-  }
-}
+{
+  "name": "compileprofile-spacetests",
+  "version": "0.4.0",
+  "description": "A package for evaluating cognitive test results from ",
+  "main": "dist/cjs/index.js",
+  "module": "dist/esm/index.js",
+  "types": "dist/cjs/index.d.ts",
+  "exports": {
+    ".": {
+      "import": "./dist/esm/index.js",
+      "require": "./dist/cjs/index.js"
+    }
+  },
+  "scripts": {
+    "build": "npm run build:csj && npm run build:esm",
+    "build:csj": "tsc --project tsconfig.cjs.json",
+    "build:esm": "tsc --project tsconfig.esm.json",
+    "test": "jest",
+    "output gonogo": "node dist/index.js",
+    "prepare": "npm run build"
+  },
+  "keywords": [
+    "cognitive",
+    "testing",
+    "memory",
+    "evaluation"
+  ],
+  "author": "",
+  "license": "MIT",
+  "devDependencies": {
+    "@types/jest": "^29.5.12",
+    "@types/node": "^20.11.24",
+    "jest": "^29.7.0",
+    "ts-jest": "^29.1.2",
+    "typescript": "^5.3.3"
+  },
+  "dependencies": {
+    "mathjs": "^14.4.0"
+  }
+}

package/src/__tests__/integration/browserInfo.test.ts

@@ -1,17 +1,17 @@
-import { getBrowserInformation } from '../../getters';
-import { loadTestData } from '../test-utils/testData';
-
-describe('Browser Information Integration Tests', () => {
-  const testData = loadTestData('nback');
-
-  // Test with spatial cognition data
-  it('should extract browser info from spatial cognition data', () => {
-    const browserInfo = getBrowserInformation(testData.nback);
-    // expect browserInfo to be an object with the following properties
-    expect(browserInfo).toMatchObject({
-      browser: expect.any(String),
-      os: expect.any(String),
-      mobile: expect.any(Boolean)
-    });
-  });
+import { getBrowserInformation } from '../../getters';
+import { loadTestData } from '../test-utils/testData';
+
+describe('Browser Information Integration Tests', () => {
+  const testData = loadTestData('nback');
+
+  // Test with spatial cognition data
+  it('should extract browser info from spatial cognition data', () => {
+    const browserInfo = getBrowserInformation(testData.nback);
+    // expect browserInfo to be an object with the following properties
+    expect(browserInfo).toMatchObject({
+      browser: expect.any(String),
+      os: expect.any(String),
+      mobile: expect.any(Boolean)
+    });
+  });
 }); 

package/src/__tests__/integration/emotions.test.ts

@@ -1,173 +1,173 @@
-import { emotion_extract_trials, emotion_results,
-  emotion_calculate_results } from '../../emotions';
-import { loadTestData } from '../test-utils/testData';
-
-describe('Emotions test module', () => {
-  const emotionsData = loadTestData('emotions').emotions;
-
-  // Comprehensive mock data for predictable testing
-  const mockEmotionsData = [
-    {
-      "index": 1,
-      "emotion": "https://unyavwofnmwihnpvkjji.supabase.co/storage/v1/object/public/test-stimuli/emotions//final/surprised_3.png",
-      "rt": 1000,
-      "stimulus": "<img src=\"https://unyavwofnmwihnpvkjji.supabase.co/storage/v1/object/public/test-stimuli/emotions//final/surprised_3.png\" class=\"max-w-none rotate_0\" width=\"512\" height=\"512\" alt=\"Mapa\">",
-      "response": 3,
-      "trial_type": "html-button-response",
-      "trial_index": 9,
-      "plugin_version": "2.0.0",
-      "time_elapsed": 45416,
-      "attempted": false
-    },
-    {
-      "index": 2,
-      "emotion": "https://unyavwofnmwihnpvkjji.supabase.co/storage/v1/object/public/test-stimuli/emotions//final/sad_1.png",
-      "rt": 1000,
-      "stimulus": "<img src=\"https://unyavwofnmwihnpvkjji.supabase.co/storage/v1/object/public/test-stimuli/emotions//final/sad_1.png\" class=\"max-w-none rotate_0\" width=\"512\" height=\"512\" alt=\"Mapa\">",
-      "response": 1,
-      "trial_type": "html-button-response",
-      "trial_index": 10,
-      "plugin_version": "2.0.0",
-      "time_elapsed": 47656,
-      "attempted": false
-    },
-    {
-      "index": 3,
-      "emotion": "https://unyavwofnmwihnpvkjji.supabase.co/storage/v1/object/public/test-stimuli/emotions//final/angry_1.png",
-      "rt": 2000,
-      "stimulus": "<img src=\"https://unyavwofnmwihnpvkjji.supabase.co/storage/v1/object/public/test-stimuli/emotions//final/angry_1.png\" class=\"max-w-none rotate_0\" width=\"512\" height=\"512\" alt=\"Mapa\">",
-      "response": 3,
-      "trial_type": "html-button-response",
-      "trial_index": 11,
-      "plugin_version": "2.0.0",
-      "time_elapsed": 49698,
-      "attempted": false
-    },
-    {
-      "index": 4,
-      "emotion": "https://unyavwofnmwihnpvkjji.supabase.co/storage/v1/object/public/test-stimuli/emotions//final/sad_3.png",
-      "rt": 1000,
-      "stimulus": "<img src=\"https://unyavwofnmwihnpvkjji.supabase.co/storage/v1/object/public/test-stimuli/emotions//final/sad_3.png\" class=\"max-w-none rotate_0\" width=\"512\" height=\"512\" alt=\"Mapa\">",
-      "response": 1,
-      "trial_type": "html-button-response",
-      "trial_index": 12,
-      "plugin_version": "2.0.0",
-      "time_elapsed": 52944,
-      "attempted": false
-    },
-    // Non-emotion data that should be filtered out
-    { trial_type: 'browser-check', browser: 'safari' }
-  ];
-
-  describe('emotion_extract_trials', () => {
-    it('should extract trials from raw data', () => {
-      const trials = emotion_extract_trials(emotionsData);
-      expect(trials.length).toBeLessThan(emotionsData.length);
-      trials.forEach(trial => {
-        expect(trial).toHaveProperty('rt');
-        expect(trial).toHaveProperty('emotion');
-        expect(trial).toHaveProperty('emotion_response');
-        expect(trial).toHaveProperty('correct');
-        // property correct should be boolean
-        expect(typeof trial.correct).toBe('boolean');
-        expect(trial).toHaveProperty('image_number');
-        expect(typeof trial.emotion).toBe('string');
-      });      
-    });
-
-    it('should handle empty data array', () => {
-      const trials = emotion_extract_trials([]);
-      expect(trials).toEqual([]);
-    });
-
-    it('should extract mock data correctly', () => {
-      const trials = emotion_extract_trials(mockEmotionsData);
-      expect(trials.length).toBe(4); // Only trials with valid emotion, rt, and response
-
-      // Check emotion extraction and response mapping
-      expect(trials[0].emotion).toBe('surprised');
-      expect(trials[0].image_number).toBe('3');
-      expect(trials[0].emotion_response).toBe('surprised');
-      expect(trials[0].correct).toBe(true);
-
-      expect(trials[1].emotion).toBe('sad');
-      expect(trials[1].emotion_response).toBe('sad');
-      expect(trials[1].correct).toBe(true);
-
-      expect(trials[2].emotion).toBe('angry');
-      expect(trials[2].emotion_response).toBe('surprised');
-      expect(trials[2].correct).toBe(false);
-    });
-  });
-
-  describe('emotion_results', () => {
-    it('should calculate correct averages', () => {
-      // Create sample trial data
-      const sampleTrials = [
-        { rt: 600, correct: true, emotion: 'happy', emotion_response: 'happy' },
-        { rt: 1000, correct: true, emotion: 'sad', emotion_response: 'sad' },
-        { rt: 800, correct: false, emotion: 'angry', emotion_response: 'happy' },
-        { rt: 400, correct: false, emotion: 'sad', emotion_response: 'happy' },
-      ];
-      
-      const results = emotion_results(sampleTrials);
-
-      expect(results).toHaveProperty('common');
-      expect(results.common.n_trials).toBe(4);
-      expect(results.common.avg_rt_total).toBe(700); // (600 + 1000 + 800 + 400) / 4
-      expect(results.common.n_correct_trials / results.common.n_trials).toBe(2/4); // (1 + 1 + 0 + 0) / 4
-      expect(results.common.performance_score).toBeGreaterThanOrEqual(0);
-      expect(results.common.performance_score).toBeLessThanOrEqual(100);
-      expect(results).toHaveProperty('special');
-      expect(results.special).toHaveProperty('by_emotion');
-      expect(results.special).toHaveProperty('confusion_matrix');
-    });
-
-    it('should handle empty trials array', () => {
-      // When given an empty array, it should handle it gracefully
-      expect(() => emotion_results([])).toThrow();
-    });
-
-    it('should calculate mock data results correctly', () => {
-      const mockTrials = emotion_extract_trials(mockEmotionsData);
-      const mockResults = emotion_results(mockTrials);
-
-      // Expected: 5 trials total, 4 correct, 1 incorrect, 0 missing (missing was filtered out)
-      expect(mockResults.common.n_trials).toBe(4);
-      expect(mockResults.common.n_correct_trials).toBe(3);
-      expect(mockResults.common.n_incorrect_trials).toBe(1);
-
-      expect(mockResults.common.avg_rt_total).toBe(1250);
-      expect(mockResults.common.avg_rt_correct).toBe(1000);
-      expect(mockResults.common.avg_rt_incorrect).toBe(2000);
-
-      // Performance score calculation using RT/(accuracy^5)
-      expect(mockResults.common.performance_score).toBeGreaterThan(0);
-      expect(mockResults.common.performance_score).toBeLessThanOrEqual(100);
-
-      // Check special results structure
-      expect(mockResults.special.by_emotion).toHaveLength(5); // neutral, sad, happy, surprised, angry
-      expect(mockResults.special.confusion_matrix).toHaveProperty('happy');
-      expect(mockResults.special.confusion_matrix).toHaveProperty('sad');
-      expect(mockResults.special.confusion_matrix).toHaveProperty('angry');
-      expect(mockResults.special.confusion_matrix).toHaveProperty('neutral');
-      expect(mockResults.special.confusion_matrix).toHaveProperty('surprised');
-    });
-  });
-
-  describe('emotion_calculate_results', () => {
-    it('should process raw data and return valid results', () => {
-      const results = emotion_calculate_results(emotionsData);
-      console.log(results);
-      expect(results).toHaveProperty('common');
-      expect(results).toHaveProperty('special');
-      expect(results.common).toHaveProperty('n_trials');
-      expect(results.common).toHaveProperty('n_correct_trials');
-      expect(results.common).toHaveProperty('avg_rt_total');
-      expect(results.common).toHaveProperty('performance_score');
-
-      expect(results.common.performance_score).toBeGreaterThan(0);
-      expect(results.common.performance_score).toBeLessThanOrEqual(100);
-    });
-  });
+import { emotion_extract_trials, emotion_results,
+  emotion_calculate_results } from '../../emotions';
+import { loadTestData } from '../test-utils/testData';
+
+describe('Emotions test module', () => {
+  const emotionsData = loadTestData('emotions').emotions;
+
+  // Comprehensive mock data for predictable testing
+  const mockEmotionsData = [
+    {
+      "index": 1,
+      "emotion": "https://unyavwofnmwihnpvkjji.supabase.co/storage/v1/object/public/test-stimuli/emotions//final/surprised_3.png",
+      "rt": 1000,
+      "stimulus": "<img src=\"https://unyavwofnmwihnpvkjji.supabase.co/storage/v1/object/public/test-stimuli/emotions//final/surprised_3.png\" class=\"max-w-none rotate_0\" width=\"512\" height=\"512\" alt=\"Mapa\">",
+      "response": 3,
+      "trial_type": "html-button-response",
+      "trial_index": 9,
+      "plugin_version": "2.0.0",
+      "time_elapsed": 45416,
+      "attempted": false
+    },
+    {
+      "index": 2,
+      "emotion": "https://unyavwofnmwihnpvkjji.supabase.co/storage/v1/object/public/test-stimuli/emotions//final/sad_1.png",
+      "rt": 1000,
+      "stimulus": "<img src=\"https://unyavwofnmwihnpvkjji.supabase.co/storage/v1/object/public/test-stimuli/emotions//final/sad_1.png\" class=\"max-w-none rotate_0\" width=\"512\" height=\"512\" alt=\"Mapa\">",
+      "response": 1,
+      "trial_type": "html-button-response",
+      "trial_index": 10,
+      "plugin_version": "2.0.0",
+      "time_elapsed": 47656,
+      "attempted": false
+    },
+    {
+      "index": 3,
+      "emotion": "https://unyavwofnmwihnpvkjji.supabase.co/storage/v1/object/public/test-stimuli/emotions//final/angry_1.png",
+      "rt": 2000,
+      "stimulus": "<img src=\"https://unyavwofnmwihnpvkjji.supabase.co/storage/v1/object/public/test-stimuli/emotions//final/angry_1.png\" class=\"max-w-none rotate_0\" width=\"512\" height=\"512\" alt=\"Mapa\">",
+      "response": 3,
+      "trial_type": "html-button-response",
+      "trial_index": 11,
+      "plugin_version": "2.0.0",
+      "time_elapsed": 49698,
+      "attempted": false
+    },
+    {
+      "index": 4,
+      "emotion": "https://unyavwofnmwihnpvkjji.supabase.co/storage/v1/object/public/test-stimuli/emotions//final/sad_3.png",
+      "rt": 1000,
+      "stimulus": "<img src=\"https://unyavwofnmwihnpvkjji.supabase.co/storage/v1/object/public/test-stimuli/emotions//final/sad_3.png\" class=\"max-w-none rotate_0\" width=\"512\" height=\"512\" alt=\"Mapa\">",
+      "response": 1,
+      "trial_type": "html-button-response",
+      "trial_index": 12,
+      "plugin_version": "2.0.0",
+      "time_elapsed": 52944,
+      "attempted": false
+    },
+    // Non-emotion data that should be filtered out
+    { trial_type: 'browser-check', browser: 'safari' }
+  ];
+
+  describe('emotion_extract_trials', () => {
+    it('should extract trials from raw data', () => {
+      const trials = emotion_extract_trials(emotionsData);
+      expect(trials.length).toBeLessThan(emotionsData.length);
+      trials.forEach(trial => {
+        expect(trial).toHaveProperty('rt');
+        expect(trial).toHaveProperty('emotion');
+        expect(trial).toHaveProperty('emotion_response');
+        expect(trial).toHaveProperty('correct');
+        // property correct should be boolean
+        expect(typeof trial.correct).toBe('boolean');
+        expect(trial).toHaveProperty('image_number');
+        expect(typeof trial.emotion).toBe('string');
+      });      
+    });
+
+    it('should handle empty data array', () => {
+      const trials = emotion_extract_trials([]);
+      expect(trials).toEqual([]);
+    });
+
+    it('should extract mock data correctly', () => {
+      const trials = emotion_extract_trials(mockEmotionsData);
+      expect(trials.length).toBe(4); // Only trials with valid emotion, rt, and response
+
+      // Check emotion extraction and response mapping
+      expect(trials[0].emotion).toBe('surprised');
+      expect(trials[0].image_number).toBe('3');
+      expect(trials[0].emotion_response).toBe('surprised');
+      expect(trials[0].correct).toBe(true);
+
+      expect(trials[1].emotion).toBe('sad');
+      expect(trials[1].emotion_response).toBe('sad');
+      expect(trials[1].correct).toBe(true);
+
+      expect(trials[2].emotion).toBe('angry');
+      expect(trials[2].emotion_response).toBe('surprised');
+      expect(trials[2].correct).toBe(false);
+    });
+  });
+
+  describe('emotion_results', () => {
+    it('should calculate correct averages', () => {
+      // Create sample trial data
+      const sampleTrials = [
+        { rt: 600, correct: true, emotion: 'happy', emotion_response: 'happy' },
+        { rt: 1000, correct: true, emotion: 'sad', emotion_response: 'sad' },
+        { rt: 800, correct: false, emotion: 'angry', emotion_response: 'happy' },
+        { rt: 400, correct: false, emotion: 'sad', emotion_response: 'happy' },
+      ];
+      
+      const results = emotion_results(sampleTrials);
+
+      expect(results).toHaveProperty('common');
+      expect(results.common.n_trials).toBe(4);
+      expect(results.common.avg_rt_total).toBe(700); // (600 + 1000 + 800 + 400) / 4
+      expect(results.common.n_correct_trials / results.common.n_trials).toBe(2/4); // (1 + 1 + 0 + 0) / 4
+      expect(results.common.performance_score).toBeGreaterThanOrEqual(0);
+      expect(results.common.performance_score).toBeLessThanOrEqual(100);
+      expect(results).toHaveProperty('special');
+      expect(results.special).toHaveProperty('by_emotion');
+      expect(results.special).toHaveProperty('confusion_matrix');
+    });
+
+    it('should handle empty trials array', () => {
+      // When given an empty array, it should handle it gracefully
+      expect(() => emotion_results([])).toThrow();
+    });
+
+    it('should calculate mock data results correctly', () => {
+      const mockTrials = emotion_extract_trials(mockEmotionsData);
+      const mockResults = emotion_results(mockTrials);
+
+      // Expected: 5 trials total, 4 correct, 1 incorrect, 0 missing (missing was filtered out)
+      expect(mockResults.common.n_trials).toBe(4);
+      expect(mockResults.common.n_correct_trials).toBe(3);
+      expect(mockResults.common.n_incorrect_trials).toBe(1);
+
+      expect(mockResults.common.avg_rt_total).toBe(1250);
+      expect(mockResults.common.avg_rt_correct).toBe(1000);
+      expect(mockResults.common.avg_rt_incorrect).toBe(2000);
+
+      // Performance score calculation using RT/(accuracy^5)
+      expect(mockResults.common.performance_score).toBeGreaterThan(0);
+      expect(mockResults.common.performance_score).toBeLessThanOrEqual(100);
+
+      // Check special results structure
+      expect(mockResults.special.by_emotion).toHaveLength(5); // neutral, sad, happy, surprised, angry
+      expect(mockResults.special.confusion_matrix).toHaveProperty('happy');
+      expect(mockResults.special.confusion_matrix).toHaveProperty('sad');
+      expect(mockResults.special.confusion_matrix).toHaveProperty('angry');
+      expect(mockResults.special.confusion_matrix).toHaveProperty('neutral');
+      expect(mockResults.special.confusion_matrix).toHaveProperty('surprised');
+    });
+  });
+
+  describe('emotion_calculate_results', () => {
+    it('should process raw data and return valid results', () => {
+      const results = emotion_calculate_results(emotionsData);
+      console.log(results);
+      expect(results).toHaveProperty('common');
+      expect(results).toHaveProperty('special');
+      expect(results.common).toHaveProperty('n_trials');
+      expect(results.common).toHaveProperty('n_correct_trials');
+      expect(results.common).toHaveProperty('avg_rt_total');
+      expect(results.common).toHaveProperty('performance_score');
+
+      expect(results.common.performance_score).toBeGreaterThan(0);
+      expect(results.common.performance_score).toBeLessThanOrEqual(100);
+    });
+  });
 });