library(tidyverse)
library(readxl)
path <- "300-399/366/CH-366 Text Cleaning.xlsx"
input <- read_excel(path, range = "B3:B9")
test <- read_excel(path, range = "E3:E9")
result = input %>%
mutate(ID = str_replace_all(ID, "(.)\\1+", "\\1"))
all.equal(result$ID, test$ID)
# [1] TRUEOmid - Challenge 366

Challenge Description
π° π§© Adding Explanations If you want to include explanations or extra notes: π Sharing External Content π£ Feedback I always appreciate your feedback β feel free to share anβ¦
Solutions
Logic:
Reads the workbook ranges needed for the challenge
Builds the intermediate columns that drive the final result
Parses the text patterns directly instead of relying on manual cleanup
Strengths:
- The R solution stays close to the workbook rule and keeps the transformation compact.
Areas for Improvement:
- The code assumes the sheet structure and source ranges remain stable.
Gem:
- The strongest part of the solution is choosing the right intermediate representation before shaping the final output.
import pandas as pd
path = "300-399/366/CH-366 Text Cleaning.xlsx"
input = pd.read_excel(path, usecols="B", skiprows=2, nrows=7)
test = pd.read_excel(path, usecols="E", skiprows=2, nrows=7).astype(str)
input["ID"] = input["ID"].astype(str).str.replace(r"(.)\1+", r"\1", regex=True)
print(input["ID"].equals(test['ID.1'])) # TrueLogic:
Reads the workbook ranges needed for the challenge
Parses the text patterns directly instead of relying on manual cleanup
Strengths:
- The Python version follows the same rule in a direct dataframe-oriented implementation.
Areas for Improvement:
- The code assumes the workbook layout remains stable, so any sheet redesign would require small adjustments.
Gem:
- The implementation stays close to the original workbook rule instead of adding unnecessary abstraction.
Difficulty Level
This task is moderate:
The core logic is clear, but the correct transformation pattern is not obvious from the raw input.
The challenge combines multiple reshaping, grouping, or parsing steps.