show code
library('tidyverse')
setwd("~/Library/CloudStorage/Box-Box/Iran")
works_5028 = readRDS("works_MS_5028976637.rds")
works_5102 = readRDS("works_MS_5102177495.rds")
works_5111 = readRDS("works_MS_5111646381.rds")
works_5112 = readRDS("works_MS_5112039075.rds")
majid_works_long = rbind(works_5028 %>% select(id, title, publication_date, topics) %>% mutate(topics = map(topics, ~ select(.x, display_name, score,subfield.display_name, field.display_name, domain.display_name)), author_id="A5028976637") %>% unnest(topics),
works_5102 %>% select(id, title, publication_date, topics) %>% mutate(topics = map(topics, ~ select(.x, display_name, score,subfield.display_name, field.display_name, domain.display_name)), author_id="A5102177495") %>% unnest(topics),
works_5111 %>% select(id, title, publication_date, topics) %>% filter(map_lgl(topics, ~ nrow(.x) > 0)) %>% mutate(topics = map(topics, ~ select(.x, display_name, score,subfield.display_name, field.display_name, domain.display_name)), author_id="A5111646381") %>% unnest(topics),
works_5112 %>% select(id, title, publication_date, topics) %>% mutate(topics = map(topics, ~ select(.x, display_name, score,subfield.display_name, field.display_name, domain.display_name)), author_id="A5112039075") %>% unnest(topics)) %>%
rename(topic=display_name) %>%
rename_with(~ gsub("\\.?display_name", "", .x)) %>%
mutate(across(where(is.character),~ gsub("https://openalex.org/", "", .x, fixed = TRUE)))
library('rempsyc')
nice_table(majid_works_long %>% distinct(title) %>% mutate(id = 1:58), title="TABLE 1. Works published under all four possible M Shahriari author IDs")TABLE 1. Works published under all four possible M Shahriari author IDs | |
|---|---|
title | id |
Comparison of Electron-Beam Dose Distributions in a Heterogeneous Phantom Obtained Using Radiochromic Film Dosimetry and Monte Carlo Simulation | 1 |
Assessment of different MCNP Monte Carlo codes in electron absorbed dose | 2 |
INVESTIGATION OF CHARGED PARTICLE TRANSPORT IN MAGNETIC FIELD AND SIMULATION OF SYNCHROTRON RADIATION BY FLUKA | 3 |
Soil Moisture Estimation Using Combined SAR and Optical Imagery: Application of Seasonal Machine Learning Algorithms | 4 |
Surface displacement measurement and modeling of the Shah-Gheyb salt dome in southern Iran using InSAR and machine learning techniques | 5 |
Estimation of land displacement in East Baton Rouge Parish, Louisiana, using InSAR: Comparisons with GNSS and machine learning models | 6 |
Neural network architecture optimization using automated machine learning for borehole resistivity measurements | 7 |
A full quantitative analysis of 18 MV photon beam from 2100 C/D-Varian clinical linear accelerator with and without flattening filter | 8 |
INVESTIGATION OF DIFFERENT ION EFFECTS ON THE ALUMINUM SAMPLES WITH A 2.5KJ MATER TYPE PLASMA FOCUS DEVICE | 9 |
Advantages of mesh tallying in MCNPX for 3D dose calculations in radiotherapy | 10 |
Monte Carlo estimation of electron contamination in a 18 MV clinical photon beam | 11 |
An advanced method for determination of loss of coolant accident in nuclear power plants | 12 |
Investigation of Spatial Distribution of Hydrogen and Argon Ions and Effects of them on Aluminum Samples in a 2.5 kJ Mater Type Plasma Focus Device | 13 |
Hybrid photoneutron source optimization for electron accelerator-based BNCT | 14 |
Xenon transient simulation of the VVER-1000 nuclear reactor using adiabatic approximation | 15 |
DESIGN AND CONSTRUCTION OF AN ACCURATE TIMING SINGLE CHANNEL ANALYZER | 16 |
DESIGN AND CONSTRUCTION OF A HIGH PRECISION TAC | 17 |
Unfolding the neutron spectrum of a NE213 scintillator using artificial neural networks | 18 |
Monte Carlo estimation of photoneutrons contamination from high-energy X-ray medical accelerators in treatment room and maze: a simplified model | 19 |
Calculation of time-dependent neutronic parameters using Monte Carlo method | 20 |
Monte Carlo Based Suggestion of the Best Choice for Material of a Multileaf Collimator (MLC) and the Required Thickness | 21 |
"Research Note" DESIGN AND CONSTRUCTION OF A HIGH PRECISION TAC * | 22 |
An Investigation on the Internal Wedge Factor Estimation for an Elekta Linac using Monte Carlo Simulation | 23 |
The Effects of Hydrogenous Medium on MRI Image of MAGICA Gel Dosimeter | 24 |
Simulation of Human Eye for Ophthalmic Brachytherapy Dosimetry Using MCNP-4C Code | 25 |
Determination of Loss of Coolant Accident (LOCA) in Nuclear Power Plants Using Signal Processing Method | 26 |
Monte Carlo simulation of X-ray spectra and evaluation of filter effect using MCNP4C and FLUKA code | 27 |
Calculation of CR-39 efficiency for fast neutrons using the MCNP and SRIM codes | 28 |
Calculation of the importance-weighted neutron generation time using MCNIC method | 29 |
Monte Carlo calculation of CR-39 efficiency for fast neutron detection using a combination of MCNP and SRIM codes, and comparison with experimental results | 30 |
Comparison of measured and Monte Carlo calculated dose distributions from “circular collimators” for radiosurgical beams | 31 |
Calculation of neutron importance function in fissionable assemblies using Monte Carlo method | 32 |
Estimation of contrast agent concentration in intra- and extra-vascular spaces of brain tissue | 33 |
Comparative assessment of different computational models for generation of X-ray spectra in diagnostic radiology and mammography | 34 |
Assessment of different computational models for generation of x‐ray spectra in diagnostic radiology and mammography | 35 |
MCNP4C-based Monte Carlo simulator for fan- and cone-beam x-ray CT: development and experimental validation | 36 |
Slit slat collimator optimization with respect to MTF | 37 |
Monte Carlo simulation of x-ray spectra in diagnostic radiology and mammography using MCNP4C | 38 |
Monte Carlo source simulation technique for solution of interference reactions in INAA experiments: a preliminary report | 39 |
Elemental characterization of TSP and two size fractions of airborne particulate matter from Tehran by INAA and AAS | 40 |
Application of MCNP4C Monte Carlo code in radiation dosimetry in heterogeneous phantom | 41 |
Gamma irradiator dose mapping simulation using the MCNP code and benchmarking with dosimetry | 42 |
Dose distribution of the IR-136 irradiator using a Monte Carlo code and comparison with dosimetry | 43 |
Borehole parametric study for neutron induced capture γ-ray spectrometry using the MCNP code | 44 |
Borehole prompt gamma neutron activation and comparison with Monte Carlo simulation using MCNP code | 45 |
Analytical Modeling of Bank Cash Flow: An Uncertain System Dynamics Approach | 46 |
The effects of variations in the density and composition of eye materials on ophthalmic brachytherapy dosimetry | 47 |
Feasibility study on the use of uranium in photoneutron target and BSA optimization for Linac based BNCT | 48 |
A spatial kinetic model for simulating VVER-1000 start-up transient | 49 |
Dose calculation and in-phantom measurement in BNCT using response matrix method | 50 |
High-frequency eigenmodes of a coaxial wave guide containing a relativistic annular electron beam with a coaxial wiggler | 51 |
Beam shaping assembly optimization of Linac based BNCT and in-phantom depth dose distribution analysis of brain tumors for verification of a beam model | 52 |
Suggesting a new design for multileaf collimator leaves based on Monte Carlo simulation of two commercial systems | 53 |
Neutron Radiography System Collimator Design via Monte Carlo Calculation | 54 |
AN INVESTIGATION OF THE EFFECT PHYTOREMEDIATION ON DISSIPATION RATE OF TOTAL PETROLEUM HYDROCARBONS IN A LIME SOIL | 55 |
Discrete formulation for two-dimensional multigroup neutron diffusion equations | 56 |
Direct discrete method and its application to neutron transport problems | 57 |
Direct Discrete Method for Neutronic Calculations | 58 |
show code
### tagging red flags
library(stringr)
majid_works_long = majid_works_long %>%
mutate(red_flag = ifelse(str_detect(tolower(title), ('soil moisture|surface displacement|land displacement')), 1, #1 = RED: author is mohammad shahriari
ifelse(str_detect(tolower(title), ('borehole resistivity measurements')), 2, #2 = RED: author is an Mostafa shahriari
ifelse(str_detect(tolower(title), ('bank cash')), 3, #3 = RED: author is a b-school majid shahriari from Islamic Azad University
ifelse(str_detect(tolower(title), ('phytoremediation')), 4, #4 = RED: author is malak hossein shahriari
ifelse(str_detect(tolower(title), ('borehole p')), 5, #5 = YELLOW FLAG: probably majid from grad school
ifelse(str_detect(tolower(title), ('airborne')), 6, 0))))))) #6 = YELLOW FLAG: weird topic but probably majid based on institution